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DOCUMENT CHANGES NOTES (D NOTES) 



GENERAL 



D2265 GENERAL - STANDARDIZATION OF COMPILER FILES 



The blocksize 
to conform to 



and 
the 



areas i z e 
standard 



attributes of all 
for- all software. 



files created by the compilers have been changed 



D2507 GENERAL - FIRMWARE FILES AND LISTINGS 



Tiles of listings of the assembly of t he c or r e s £ o nd i ng, f i r mwar e f.l^__A Mst.ng of the 



225AND235 firmware may be produced by copying 
entering the following control card image: 

?PB "SYMB0L/FIRMWARE/225AND235" SAVE. 



SYMB0L/FIRMUIARE/225AND235 to DISK or PACK and 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
GENERAL 

P1414 GENERAL - COPYRIGHTS, VERSION LEVELS UPDATED 
The copyright notices have been updated for 1978. 
Version levels for all software products have been set to the current level 
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DOCUMENT CHANGES NOTES CD NOTES) 
ALGOL 

022^1 ALGOL - "SEGDESCABOVE" $ OPTION 
The following changes have been made In the t mp I erne n t a t i o n of the SEGDESCABOVE $ option: 

1. The value is no longer optional; an explicit value must be given, 

2. The option may now be used even after compilation has begun; in this case, the given value 
is added to the current size of the Dl stack. 

3. The value may be a compile-tlme variable, as well as a constant. 
D225B ALGOL - "SWARNSUPR" IMPLEMENTED 

The WARNSUPR dollar card option now causes the printing of warning messages to be suppressed. 
WARNSUPR is RESET by default. 

D2E83 ALGOL - UPDATE INFO LEVEL 
The compiler's info level has been changed. To do a sepcomp or loadinfo the info level of the 
host and the procedure to be bound must match exactly. The new ,nfo level ,s 30. 

D2289 ALGOL - "OFFSET" FUNCTION 

. , t !•„„ nFFSFT «.« i nter-exoressi on>) , is now available. This function calculates 
th nllllr o? aracterl o w ds rms of the character or word size of the pointer 

the number of jnar.elerB or . lndexed from lhe fpont f an array row. The OFFSET 
f , rc:ion 0n returns th a 1 1 la I ' o f f s e t f r om" t ne point of the first row for pointer expressions wh.ch 
point at segmented arrays. 

D2290 ALGOL - DEFINE INVOCATION IN DECLARATIONS 
Defines are not expanded in declarations if they occur where the identifier being declared is 
expected. 

Examp I e : 

DEFINE P = PROCEDURE #; 

REAL P; 

The P in the second line of the above example will not be expanded to PROCEDURE. This is 

necessary so that define identifiers can be redeclared. 

D2H03 ALGOL - WARNINGS ON USE OF "BCL" CONSTRUCTS 

u.. -j ;«. ...gw-.*.,-"..;.- ..»; .„»»;:{ »«t: r ::ii':? Lct"M',iv,v, l ,r. :;:;::: ;; :?i 

portable to tdUUlo macnines. uiiiy ms ' , „„. m .,„:* mill rause a warn ng to be emitted. 

I':.::!:, , :.::::: , t;!r:;::'::J.:"t: , ;.:"iJ:i.:ft'.;:r::i!.: , is !::■:.. - ...'.i.».,. 

D2H27 ALGOL - STRING IMPLEMENTATION 
String variables allow for the storage and manipulation of character strings within a program. 
A string is a structured data type whose c.-p.n.nl. .r. .1 . of on e ch ara cter ty p. A .trln, has 
^"in^^s^nractrarlLgtrof^h^^ring'is^e^^ry 11 V\ .? a 1 numb e r of characters stored 
into the string variable. 
The syntactic items used in this description match those in the ALGOL Manual. 

STRING DECLARATION 

All string variables must be explicitly declared in a siring declaration statement: 
<string declaration) 

i< . ! 

i i i 

STRING — <string id> ' 

EBCDIC - 
ASCII — 
HEX 
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< s t r i n g !d> 
-- <id> 



Strincj^ariables have flexible storage areas whose working size is completely under control of 
The maximum string length allowed is 2 »• 16 - 2 characters. 

AM string v ar i ab I e s i n a <s t r i n g declaralion> are of the same character type. If no character 
type is specified, the default type will be used. cnaracter 

Ihl Bn'tlnV-T-M 9 ' \ y V of t EBCDIC m ?y be changed by using a SASC I I or a SBCL card; however 
the BUL type is illegal for string variables. <•"■». "«"«•. 

Examples 

ASCII STRING SI , S2 , S3; 
HEX STRING S4 ; 

EBCDIC STRING S5 , S6 , S7 , S8; 
STRING S9; 



STRING ARRAY DECLARATION 



of S str?nYvariabUs arati0n "" "' "^ l ° deC ' are * StrIn9 8rra ^ A slrin 9 arr » 



y i s an array 



<string array declaration> 

STRING ARRAY 
EBCDIC 




<string array id> [ — <bound pair list> — ] 



<string array id> 
— <ld> 



<bound pair list> 
|< 



■ -- <arithmetic expression) -- : -- <arithmetic expression) | 

w!M be h use"! er ^^ ^ Specified in • str! "9 *"■** declaration, the default character I 



ype 



In'lhS'ALGoC'lilniil!' S " eC ! f ' c al ' on is •*■«*'* *•»• -me as for an ARRAY declaration described 
Examples 

STRING ARRAY SA, SB. SCtO : 103; 

EBCDIC STRING ARRAY ESA[ 1 : 15], ESB, ESCrO : 10. : 101; 
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STRING PROCEDURE DECLARATION 



The syntax for a procedure declaration is extended to allow a string-valued procedure. 

STRING PROCEDURE --< pr oc edu re heading)— ; > 

EBCDIC -I 
I- ASCII —I 

HEX I 

>-<procedure body) ' ™ ' 



If no character type is specified in the string procedure declaration, 
type will be assumed. 

STRING PROCEDURE STR;... 

HEX STRING PROCEDURE HEXPROC(R); REAL R;... 

STRING ASSIGNMENT 



the default character 



A string variable is assigned a value via the < s t r i n g assignment statement): 
<slring assignment statement) 

| < I 



<string var> 



I 
j- <subscripted string var> -| 

|- <string procedure id> 1 



>- <string expression) 



I 
I- 



CAT 



The result of the expression on the right hand side of the assignment operator must be a string 
of the same character type as the declared type of the string variable on the left hand side. 
If this condition is not satisfied, a syntax error will occur. 



Note that embedded assignment is not allowed for strings. 

illegal: 

SI := DR0P(S2 := "ABC", 2); 



The following is syntactically 



STRING EXPRESSIONS 

<string expression) 

-- <slring primary) 

! ,< j 

| CAT <string primary) 

I I 
I- II —I 



The allowable forms of <string primary) are given by: 
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< s t r i n g primary> 

- -- <slring constant) 

I- <slring var> 

<su b s c r i p t e d string var> 

I- <string procedure) 

I- <TAKE - DROP function) 

<HEAD - TAIL function) 

<REPEAT function) 

<TRANSLATE function) 

<STRING function) 

( -- <string expression) -- ) 



<string constant) 



l<- 



<EBCDIC code) 



<EBCDIC string) 



--- <ASCII code) 



<ASCII string) 



<- 



— < hex adec i ma I code) — " — <he xad e c i ma I string) 

EMPTY 

EMPTY8 

EMPTY7 : 

EMPTYH- 



A string constant can be composed of EBCDIC (8-b i t ) , ASCI I C7-b t t in 8-bit format), and 
hex adec i ma I (4— b i t ) characters. 

The strina code determines the interpretation of the characters between the quotes as described 
in the ALGOL Manual; however, it has no effect on the justification of a siring. A strinq is 
always left justified. 

JnJn^ Ser «^,y ords E f!£I Y8, EMPTY7 antl EMPTY4 represent null strings of the character type 
tBLUiC, ASCII, and HEX, respectively. The reserved word EMPTY represents a null string of the 
default character type. 

Examples 



8"ABCD123"; 

""WHY"48"6F "': 

EMPTY8; 



result = "ABCD123" 
result = ""WHY?"" 
result = " " 



<stringvar) 

-- <string id) ■ 

<string var) is a <string id) declared in a <slring declaration). 



Subscripted string var) 

— <string array Id) — [ — (subscripted list) — ] 
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THE TAKE - DROP FUNCTION 



<TAKE - DROP function) 

TAKE ( — <string expression) — 

I I 

I- DROP -I 

>- Arithmetic expression) -- ) 



of 



The TAKE function returns a new string whose value is a copy_ 
expression) number of characters taken from the <string expression) 
the value of Arithmetic expression) is greater 
expression), or Arithmetic expression) is less 
the result is the null string. If Arithmetic 
expression), the result is the same as the value 



the first 
An error w 
than the number of characters 
than zero. If Arithmetic express! 
expression) is the length of 
of Atring expression). 



The result of the DROP function is a copy of the characters remaining in Atring 
with the first Arithmetic expression) number of characters removed. The value of 
expression) is limited as in the TAKE function. If the value of Arithmetic exp 
zero the result is the same as the value of Atring expression). If the value of 
expression) is the length of the Atring expression), the result is the null string 



Arithmetic 
ill occur if 

in A t r i ng 
on) is zero, 
the Atring 



expression) 

< ar i thme I i c 

ression) is 

Ar i thme I i c 



For any (string expression) S and 
LENGTH(S), the following relation 



any (arithmetic 
is always TRUE: 



expression) A in the range 



A < = 



TAKEtS, A) I I DROPCS, A) 



Examples 



Assume string S has length of 6 and contains "ABCDEF": 



TAKEtS, 2) 
TAKEtS, 4) 
DROPtS, 2) 
DROPtTAKEtS, H) , 2) 
TAKECS, 8) 
DROPtS, - 2) 



gives 
gives 
gives 
gives 
gives 
gives 



"AB" 

"ABCD" 

"CDEF" 

"CD" 
run -time error 
compile-time error 



THE HEAD - TAIL FUNCTION 



(HEAD 



TAIL function) 



HEAD — 

I I 
I- TAIL -I 



(siring expression) -- , — (character set) 



) —I 



(character set) 



I 



(string constant) 



I- NOT -I I- (truthset) 



A (character 
functions, 
character's 
set) must 
error will 



set) 

NOT 

except 

be of 

occur. 



the action of the HEAD an 
J of 
defined in the ALGOL Manual 



is a collection of characters used to control 

is used to indicate a character set consisting of aM ( c har ac t er ^ s t r . ng 

those specified. A (truthset) is 

the same character type as the (string expression); otherwise, 



A < cha 
a comp i 



The HEAD function returns a new string consisting of a copy of all the leading 
(string expression) that belong to the characters specified by (character set) 
character in (string expression) is not a member of the (character 
returned. 



set). 



char act e 

If the 

null sir i 



The TAIL function 
expression) that 



(character 
(character 



set), 
set), 



returns a new string consisting of a copy of all the characters in < 
remain after the removal of all the leading characters that bel 
If all characters in (string expression) are members of Ihe spe 
a null siring is returned. 



d TAIL 

code) 

r ac t er 

e-t i me 



r s in 

first 

ng is 

string 
o ng to 
cif i ed 
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For any <str-[ng expression) S and any Character set) C, the following relation is always TRUE: 
S = HEADCS, C) I I TAILtS, C) 

Examp I es 



Let S be a string of length 9 and contain "ABC/1-2+3' 

HEADtS, NOT "/") 
HEAD(S, ALPHA) 
TAILtS, NOT "-") 
HEADtS, "123") 
TAIL (DROP (S, 7), "+-") 

THE REPEAT FUNCTION 



gives 
gives 
gives 
gives 
gives 



ABC" 
ABC" 
-2+3" 

* NULL STRING 
3" 



<REPEAT function) 

-- REPEAT -- ( — <slring expression) 

>_ j 



<arithmetic expression) -> 



If the value o f < ar , t hme t i c expression) is zero, the result of the REPEAT function is the null 
string. If the value of < ar i I hme t i c expression) is greater than or equal to 1, the result is 
<ar,thmet,c expression) occurrences of the <string expression) value concatenated together If 
the value of <arithmetic expression) is less than zero, the result is an error. 

Examples 

g|PEAT ("ABC", 3) gives "ABCABCABC" 

REPEAT(S, -5) gives comp i I e-t i me error 

THE TRANSLATE FUNCTION 

TRANSLATE function) 

TRANSLATE — ( — <string expression) — , — <translate table) ) 

>_ , 



F»rh r !^IL? f J h ? k TRANSLATE function is a string of the same length as the <string expression), 
tach element of the result string gets translated according to the -(translate table). 

An explanation of the translate table) can be found in the ALGOL Manual. A translate table) 

trJn,il!*-" B J hi" tu lab ' e t '' d \ decl » r ^ ^ the program or one of the standard supplied 
translation tables. The use of a Subscripted variable) as a translate table) is not allowed. 

Examples 

TRANSLATED, HEXTOEBCDIC) 
TRANSLATE ( TAKE (S, 10), MYTT) 

THE STRING FUNCTION 
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<string funci!on> 

STRING ( 

I 

I- STRINGS 



I- STR1NG7 

I 

I- STRINGS 

> <pointer expression> -- , - 

I 

I- <ari Ihraetic expression) -- 



<arithraetic expression) ) 

<arithmelic expression) -| 

! I 



he STRING4, STRING7 and STRING8 functions return a hexadecimal string, an ASCII string and an 
BCDIC string, respectively. The STRING function returns a string of the default character 

must be used to avoid illegal transfers. 

pointer expression) provides for conversion from arrays to strings. 
urns a string which is a copy of the characters pointed at by the 
cond parameter, rounded, specifies the number of characters taken. 

arithmetic expression) as the first parameter generates a new 
e character representation of the first Arithmetic expression). A 
ed to convert an integer, real or double number to an EBCDIC or 



T 

EBCD 

type. 

The proper <slring function) 

The < 5 I r i n g function) on a < 
The < s It ring function) ret 
<pointer expression). The se 

The <string function) with < 
siring whose value is th 
formatting intrinsic is call 
ASC II string. 

The number is converted into 
second '(arithmetic expressio 

If the second parameter resu 
is equal to zero, the r 
expression) is greater than 
argument, a sufficient numb 
number of characters needed, 
<string function) is an a 
digits of the character repr 
value of the first <arithmet 

In the case of the STRING 1 * f 
converted. If the value 
resulting string, only the I 
is greater than the number 
characters will be inserted. 



the most efficient form dependent on the length specified by 
n> parameter as described in the following paragraph. 



the 



Its in a value less than zero, an 
eturned string is of length zero, 
the minimum number of characters 
er of leading blanks are inserted, 
asterisks are put into the string 



error will occur. If th 
I f the va I ue of this <ar 
needed to represent th 
If the value is smaller 
_. If the second parameter 
slerisk (*), the string will be just long enough to contain 
esentation of the first argument with no leading blanks, 
ic expression) is zero, the string will be one character lo 

unction, only the integer part of the first parameter 
of the second parameter is smaller than the number of digit 
ast digits will be returned. If the value of the second p 
of characters needed to represent the first argument, 



lead 



e value 

i t hme t i c 

e first 

than the 

of the 

all the 

If the 

ng. 

will be 
s in the 
arameter 
i n g zero 



Examp I es 



STRINGttP, 20) 
STRING7(P0INTER(A) , 
STRING (256, *) 
STRING (-335.25, 8) 
STRING(4.78o-2, 5) 
STRING (555000, 3) 
STRING(555000, 1) 
STRING4C l t56.789, 7) 
STRING7(185, -2.5) 



3) 



gives 
gives 
gives 
gives 
gives 
gives 
c omp i I e 



"256" 

" -335.25" 

".0 L +78" 

"6E5" 
ii * I. 

"0000 l +56" 
-time error 



THE CONCATENATION OPERATION 



Two or more strings may be concatenated together by use of the CAT or II (double bar ) o per at or . 

The concatenation of two strings yields a new string whose length is the sum of the lengths of 

the two original strings. The value of the new string is formed by joining a copy of the 
second string immediately onto the end of a copy of the first string. 

Only strings of the same character type may be concatenated. If they are not of the same type, 
a syntax error occurs. 

If more than one <string primary) is used in a concatenation operation, these are evaluated 
from left-lo-right. 
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Examp I es 



SI 
SI 
SI 



= S3 II S3; 

= "AC" II S2 II "123"; 

= SI II TRANSLATE (S2, HEXTOEBCDIC) ; 



THE BOOLEAN OPERATIONS ON STRINGS 

The following BOOLEAN operators are available on operations with strings: 

EQL or 

NEQ or "~=" 

Two strings are equal if and only if the LENGTHS are equal and every element in one string is 
equal to the corresponding element in the other string. Two null strings are equal. 



GTR 


o r 


">" 


GEQ 


or 


">=" 


LSS 


or 


II / II 


LEQ 


or 


»< = " 



One string is strictly greater than another string if and only if 

1) The first differing element in a pair comparison of the two strings is greater in the 
first string than in the second string 

or 

2) The LENGTH of the first string Is greater than the LENGTH of the second and the two 
strings differ in no element up to the LENGTH of the second. 



Only strings of the same character type may be compared; otherwise, a syntax error occurs 

Whenever two string constants can be compared as two arithmetic primaries, they 

that manner; i.e., the Boolean expression "AA" < "B" evaluates to FALSE „„>,„„„„ t „„ „«„ 
constants are considered to be arithmetic primaries (no change from pre-III.O ALGOL). However, 
if two strings were assigned the values "AA" and "B" and the comparison made, the answer would 
be true; i.e., S:="AA"; T:="B"; S < T evaluates to TRUE. 



are compared in 
because the two 



Examp I es 

SI := "AAB12+"; 

All these comparisons are true; 

SI EQL TAKEtSl , 6) 

SI NEQ HEAD (SI, ALPHA) 

SI GTR HEAD(S1, ALPHA) 

SI LSS DR0P(S1, 3) 

SI LSS DR0P(S1, 1) 

THE DISPLAY STATEMENT 



DISPLAY -- ( <pointer expression) — 

! i 

I- <string expression) — | 



l^h^.^RrSTr 36 ? •° r d! fP' ay !"9 on ihe s y stem SP0 - The resu| t °f I"* <string expression) 
must be an EBCDIC string, otherwise, a syntax error occurs. 

THE ACCEPT STATEMENT 
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ACCEPT Statement 



ACCEPT — ( <pointer expression> 

I I 

I- <string var> 1 

I- <subsc r i p t ed string var> -| 



The (string var> or (subscripted string var> in an ACCEPT function must be of EBCDIC type; 
otherwise, a syntax error occurs. 

The ACCEPT function displays its string parameter on the system SPO and waits for an operator 
response (via the AX message) as specified in the ALGOL Manual. 

THE REPLACE STATEMENT 



REPLACE Statement 



REPLACE -- destination part> — BY <source I i s t > 

I 

I- <string var> - 



j- Subscripted string var> -| 

To make it possible to transfer data from a siring to an array, a <string var> or Subscripted 
string var> may be used as a (source list> in a REPLACE statement. 

Examples 

REPLACE P BY S; 
REPLACE P BY SAIt, JJ; 



THE LENGTH FUNCTION 



<LENGTH f unct ion> 

-- LENGTH -- ( — <slring expression) — ) 



The LENGTH function is an integer function. The result is the number of characters in the 
string. The null siring has the length zero. 

Examples 



SI := "ABCDE"; 
LENGTH(Sl) = 5; 
LENGTH(EMPTY) = 0; 



THE DECIMAL FUNCTION 



(DECIMAL fundi on > 

— DECIMAL — ( — (string expression) — ) 



This function returns as a double precision number' the decimal value represented by the (string 
expression). The double value Is rounded to a single precision value when stored into a single 
precision (i.e., REAL) variable. 

If the string does not represent a valid number, a run-time error occurs. 
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Examp I es 



= DECIMAL(S) ; 

= DECIMAL("-46.78E-3") 

= DEC1MALC-E5"); 

= DECIMAL ("A7"); 



run-l i me error 



EXTENSION TO PROCEDURE DECLARATIONS 



A <slring var> may be used as 
var> must be specified in the 



a formal parameter to a procedure. In this case, the <string 
procedure heading as a part of <formal parameter list>. 



a call-by-reference or call-by-value parameter. Any <string 
as either a ca I I -by-refer ence or ca I I -by-va I ue parameter. The 



A <string var> may be used as 

expression) may be passed 

default mode of passing a string is ca I I -by-re f erence 

Note: Thedefaull mode of passing parameters in ALGOL is call-by-name, except when passing 
strings. Ca I I -b y-re f er enc e parameter passing has not previously been used as a method 
of passing parameters. The major difference between c a I I -by-re f erence and call-by-name 
parameter passing has to do with the passing of expressions; i.e., passing something 
other than a simple variable or subscripted variable. When an expression is passed 
call-by-name, a "thunk" occurs; i.e., the expression is evaluated every time the 
parameter is referenced in the called procedure. In other words, a reference to the 
code to evaluate the expression is passed rather than the value itself. However, when 
an expression is passed ca I I -by-refer ence , the expression is evaluated once at the time 
the expression is passed and the value of the expression is passed to the called 
procedure. Passing simple variables or subscripted variables call-by-name or 
c a I I -b y-re for ence works the same in both cases. 

Examp I es 



X PROCEDURE DECLARATIONS 



EBCDIC STRING PROCEDURE PROCCI.S); 
VALUE I; INTEGER I; STRING S: 



PROCEDURE P(S); 
VALUE S; STRING S; 

X PROCEDURE CALLS 

PC'ABCD"); P(TAKE(S, 10)) 
PtSTR II "10") ; 

INPUT/OUTPUT 



Unformatted I/O 



<format and list part> 

— <arithmetic expression) — , 



<slring var> 

I I 

I- Subscripted string var> -| 



An <ar i t hmel ! c expression) followed by a <string var> specifies that input data is to be 
assigned to the string variable without being edited. On output, the characters of the string 
variable are written as output without being edited. The number of characters read is 
determined by the maximum record size or the absolute value of the Arithmetic expression), 
whichever is smaller. On output the number of characters is determined by the minimum of the 
maximum record size, the absolute value of the Arithmetic expression) and the string length. 

^NTMnnF*-VA| l | l |F C qT f1 r 3 r are ' n characters - on| y if the file attributes UNITS=VALUE (CHARACTERS) and 

Examples 



(Assume files "IN" and "OUT" have MAXRECSIZE >= 50 and UNI TS=CHARACTERS) 



READCIN. 50, S); 
WRITEtOUT, 25, S) 



reads 
writes 



50 
25 



characters 
characters 



into 
from 



string 
string 
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Formatted I/O 

<slring vir> or <subsc r i p I ed string var> are legal <llst elemenl)s for A, C and freefield 
format . 

Strings behave in the same manner as "<pointer> FOR Arithmetic expression)" under the format 
phrases A and C. 

Examp I es 

READdN. <2A10), SI, S2> ; 
REACKIN. <A*>. 20, S) ; 
WRITEtOUT. /.SI, S2, StJl) ; 

D2H4-2 ALGOL - POINTER IN TRUTHSET FOR LENGTH 

The syntax fgr the <table membership) form of <boolean primary) has been expanded to include: 

<pointer expression) IN <table pointer) FOR <arithmetic expression). 

This allows the programmer to test whether the first <arithmetic expression) characters of the 
<po inter expression) are in the table referenced by the <table pointer). 

Examp I e : 

The following two statements have the same function as the third statement: 

SCAN PTR FOR 10 WHILE IN ALPHA; 
IF TOGGLE THEN . . . ; 

IF PTR IN ALPHA FOR 10 THEN . . .; 

D2483 ALGOL - UPLEVEL POINTERS 

Uplevel points and uplevel SWAP statements are now syntax errors. ALGOL no longer allows the 
POINTER FOR clause to be used for formal pointer parameters or in global declarations; e.g., 
the following example will now get a syntax error: 

PROCEDURE PROC(PTR) ; 

POINTER PTR FOR GLOBALPTR; 

Several problems with uplevel pointer syntaxing have been corrected. INTEGER and REAL 
functions using pointers as parameters will no longer cause incorrect uplevel pointer warnings. 
If a pointer assignment in a READLOCK function is uplevel, ALGOL will give a syntax error. 
Pointers in global declarations can only be assigned to themselves unless level 3 has been set. 
Also, any pointers, including formal pointer parameters, can be assigned level 2 pointers. 

Examp I e : 

BEGIN 

POINTER PI; 
PROCEDURE PROC t 
BEGIN 

(1) POINTER P2; 

(2) P1:=P2; X This will give syntax error 

END; 

END. 

In order to compile statement (2) syntax-free, change statement (1) as follows: 

POINTER P2 FOR PI; 

D2H84- ALGOL - "DIRECTORYCONTROL , STACKSWAPPER" REMOVED 

DIRECTORYCONTROL and STACKSWAPPER (not STACKSWAP) are no longer recognized as functions by the 
ALGOL compiler. The MCP procedures to handle these functions were removed on previous 
releases. 
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D2520 ALGOL - WAYS TO REMOVE USE OF "TOGGLE," "OVERFLOW" 

The following examples indicate how to remove use of the TOGGLE and OVERFLOW functions. 

TOGGLE Removal 



Example of use of the TOGGLE function: 

REPLACE PTR1 3Y PTR2 FOR 10 UNTIL = "."; 
IF TOGGLE THEN . . .; 

A <residual count) can be used in the <count part> of the (replace statement). Testing for the 
(residual count) = will give the same result as testing TOGGLE. 

The following statements have the same result as the TOGGLE example above. 

REPLACE PTR1 BY PTR2 FOR N: 1 UNTIL ="." ; 
IF N=0 THEN . . . ; 

^ se ?, f ~J; he "POINTER IN <truthsel> FOR <length>" construct may also be used in lieu of TOGGLE. 
See ALGOL note D2442 for details. 

OVERFLOW Removal 



Example of use of the OVERFLOW function: 

IF OVERFLOW THEN; x RESET THE OVERFLOW FLIP-FLOP 

REPLACE PTR BY N FOR 3 DIGITS; 
IF OVERFLOW THEN . . . ; 

Use of the OVERFLOW function can be removed by checking that the Arithmetic expression), N, 
will fit in the number of digits specified. 

The following statements have the same result as the OVERFLOW example above. 

REPLACE PTR BY N FOR 3 DIGITS; 
IF ABS(N) )= 999.5 THEN . . . ; 

DS563 ALGOL - INVALID CHARACTERS IN IDENTIFIERS 

On the III.l release, the use of identifiers with characters whose EBCDIC character code is in 

the range Cl-FF which are not the letters A-Z and not the digits 0-9 will cause a syntax error. 

(■or example, AB\C is now a legal identifier, but will cause a syntax error on the III 1 
release. 

D2584 ALGOL - "SORT" STATEMENT 
The ALGOL Reference Manual (No. 5001639), page 5-101, should be changed to read as follows: 
<record length) 

The (record length) represents the length, in words or characters depending on whether the 
array is a regular array or a character array respectively, of the largest item that is 
presented to the (sort statement). If the value of (arithmetic expression) is not a 
positive Integer, the largest integer that Is not greater than the absolute value of the 
e ?§ r QQl' 0n ti S used! ihal !s - a record length of IE is used if an expression has a value of 
lcf.ayb. If the value of the (arithmetic expression) is 0, the program terminates. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

ALGOL 

PI 103 ALGOL - ERROR FOR TOO MANY SUBSCRIPTS 

The ALGOL compiler will now give the correct syntax error, rather than an INVALID INDEX, when a 
five -dimensional array with too many subscripts is referenced. 

P1481 ALGOL - "THRU" LOOPS IN "I/O" LISTS 

A THRU loop in an I/O list in a READ or WRITE statement that could affect later statements 
which involved constants has been corrected. For example, if a WRITE statement containing a 
THRU loop in the I/O list were followed by the assignment of a constant into a simple variable, 
code for the constant would not be emitted. This no longer occurs. 

PI 605 ALGOL - POINTER CASE EXPRESSIONS 

The problem of erroneous "GLOBAL POINTER TO LOCAL NOT ALLOW" error messages, which could 
possibly be emitted following a pointer case expression, has been corrected. 

PI 627 ALGOL - CRITICAL BLOCK EXIT FROM "PROCESS" STATEMENT 

It was possible for a program containing a PROCESS statement to get a critical block exit 
during execution if the critical block contained no other items which would require a call on 
the MCP procedure BLOCKEXIT. This has been corrected. 

PI 638 ALGOL - SCANNING AFTER "XREFFILES" 

Dollar card options following XREFFILES will now be properly recognized. 

P9072 ALGOL - "$ INCLUDE" INTERRUPTS "SMAKEHOST" 



When a host was compiled with SMAKEHOST, and procedures were added with the SINCLUDE option, a 
subsequent SEPCOMP into procedures following the included procedures would fail. Now, the 
SMAKEHOST option is reset at the beginning of an include and restored at the end. 

P9101 ALGOL - REAL VALUED SERIAL NUMBERS 

File declarations with real valued SERIALNO attributes now compile and execute correctly. 
Five- and six-character values for SERIALNO no longer cause the compiler to terminate with an 
integer overflow. 

P9102 ALGOL - COMPILE-TIME DISPLAY 

A compile-time display statement; e.g., 'DISPLAY . . ., which displayed more than 2H- characters 
would lose some characters. This has been corrected. 

P9211 ALGOL - "SLOADINFO" 

Information files are now loaded correctly when SLOADINFO is set. A SEG ARRAY error will no 
longer occur during compilation. 
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MARK 3.0 
DOCUMENT CHANGES NOTES (D NOTES) 
ALGOL TABLEGEN 



D2418 ALGOLTABLE - "ALGOL" TABLE GENERATOR 

ALGOLTABLEGEN is used to create certain defines, arrays and value arrays for the ALGOL 
compiler. Specifically, ALGOLTABLEGEN creates the following: 

1. The error message value array and error message defines 

2. The defines for the ALGOL ELCLASSES 

3. The defines for certain special values 

H. The ALGOL INFO table entries for the identifiers recognized by the ALGOL compiler. 

This program replaces TABLEGEN for the ALGOL compiler only. TABLEGEN is still available for 
the ESPOL and XALGOL compilers (see II. 9 ALGOL note D2031 for a description of TABLEGEN). This 
description of ALGOLTABLEGEN is divided into two parts. The first part describes how to use 
ALGOLTABLEGEN; the second part describes the input data to ALGOLTABLEGEN. 

How to Use ALGOLTABLEGEN 



SYMBOL/ALGOLTABLEGEN is divided into two parts. The first part (sequence numbers 
10000000-39999000) consists of all the current input data to ALGOLTABLEGEN. The second part 
(sequence numbers 4-0000000-e nd ) consists of the actual program. The program requires the two 
following input files: 

File CARD: This file contains all patches to the current input data. 

File SYMBOL: This file contains the current input data which is to be patched. The default 
file name for this file is "SYMBOL/ALGOLTABLEGEN". 

The two following output files are produced: 

File PATCH: This file contains the patch to the ALGOL compiler created by running 
ALGOLTABLEGEN. The default file name for this file is "PATCH/ALGOL". 

File LINE: This line printer file is created only if errors occurred during the execution of 
ALGOLTABLEGEN. 

The following NFL deck will run ALGOLTABLEGEN: 

<I> RUN SYSTEM/ ALGOLTABLEGEN; 

DATA 

<patch cards) X May include "X" comment cards and S cards 

<I> END. 

If ALGOLTABLEGEN runs without errors, the following occur: 

A patch will be created under most circumstances 
The message "PATCH CREATED" will be displayed 
MYSELF. TASKVALUE will be set to 1 

If ALGOLTABLEGEN runs with errors, the following occur: 

A patch file will not be created 

The message "ERRORS-NO PATCH CREATED" will be displayed 

MYSELF. TASKVALUE will be set to 

If an updated SYMBOL/ALGOLTABLEGEN is required, a new symbol may be created by compiling the 
current symbol plus all patches and setting the NEW option. The following WFL deck will 
compile ALGOLTABLEGEN and create an updated symbolic: 

<I> COMPILE SYSTEM/ALGOLTABLEGEN WITH ALGOL LIBRARY; 

ALGOL FILE TAPE=SYMBOL/ ALGOLTABLEGEN; 

ALGOL FILE NEWTAPE=SYMBOL/NEW/ ALGOLTABLEGEN; 

DATA 

SMERGE NEW 

<patch cards) 
<I> END. 

Note: The identical DATA deck may be used for both the execution and compilation of 
ALGOLTABLEGEN. 

Input Data 

As previously stated, sequence numbers 10000000-39999000 of SYMBOL/ALGOLTABLEGEN contain the 
current input data, which is divided into five parts. The following describes each of the five 
parts: 
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OPTIONS (1000E000) 

This section contains the name and 
sections. This section should not 

ERRORS (11000000) 



beginning sequence number 
be changed . 



of each of the other four 



15 characters in length) and the 
image). The program will create 
the error messages and will create defines for each 
index into the value array and the character length 



This section contains the error message name (not to exceed 
error message text (not to exceed the remainder of the card 
a value array containing the text of all 
error message. Each define contains the 
of the error message text. 

ELCLASSES (15000000) 

This section contains a list of all the ALGOL ELCLASSES. Their numeric values are assigned 
in ascending order. These numeric values are the define values created for the compiler. 

MISCELLANY (20000000) 

This section contains a list of miscellaneous identifiers and the value which must be 
assigned to each identifier. As with the ELCLASSES, defines are created for the compiler 
using these identifiers and their specified values. 

INFO (25000000) 

This section contains a list of the identifiers recognized by the ALGOL compiler. The 
format of each record in the INFO section is described in detail in the symbolic at sequence 
numbers 25000000-25001 1 00 . 
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DOCUMENT CHANGES NOTES (D NOTES) 

ATTABLEGEN 

02478 ATTABLEGEN - "WFL" JOBS SEE MORE TASK ATTRIBUTES 

All WFL jobs can now test the value of the read-only task attributes ACCUMIOTIME and 
ELAPSEDTIME. 
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DOCUMENT CHANGES NOTES (D NOTES) 
BACKUP 



D2217 BACKUP - "AX-<RECORD #>" GTR CURRENT RECORD COUNT 

BACKUP will now start printing from the start of a printer backup tape whenever a "<mix#> 
AX-<record *>" is entered that positions the tape past BOT. 

D2275 BACKUP - DISALLOW "ND" WHEN USED WITH "*" 

The use of "*" to cause BACKUP to print the backup files for a Job before the job terminates is 
restricted to direct output only; the " ND ,; option may not be used with it. 

Example: 

CORRECT - ?PB D » C0P1ES=4 
INCORRECT - ?PB D » ND C0PIES=4 

D2421 BACKUP - "RANGE" OPTION SEMANTICS 

BACKUP has been modified to perform range checking differently. The following example will 
illustrate the change. 

Suppose a printer backup file contains the following records: 

Rec * Contents 



1 


AAAA 


2 


BBBB 


3 


CCCC 


4 


AAAA 


5 


HHHH 


B 


DDDD 


7 


ZZZZ 


8 


DDDD 



Suppose the following PB statements are used to print the above file: 

1) PB <filename> KEY 1 4 RANGE "AAAA" "ZZZZ" 

2) PB <filename> KEY 1 4 RANGE "AAAA" "DDDD" 

3) PB <filename> KEY 1 4 RANGE "CCCC" "FFFF" 

Previously, BACKUP ignored records within the range which had keys greater than the stop key. 
The PB statements would have printed: 

1) Lines 1,2,3,4,5,6,7 

2) Lines 1,2,3,4,6 

3) Lines 3,4,6,8 

BACKUP has been modified to treat records with keys greater than the stop key as if they had 
the stop key. Now, the PB statements will print: 

1) Lines 1,2,3,4,5,6,7 

2 ) Lines 1,2,3,4,5 

3) Lines 3,4.5 

D2443 BACKUP - DISK AND PACK SEARCHED FOR EACH FILE 

BACKUP now searches disk and pack for each file It is asked to print. If a requested file is 
present on both families, it will be printed twice. If only the files under one of these 
families is to be printed, the following syntax must be used: 

"<file name) ON < f am i I yname >" . 

BACKUP has been further modified to search the system family "DISK" instead of the user's 
f am i I y . 

D2583 BACKUP - "BACKUPBYJOBNR" 

The discussion of BACKKUPBYJOBNR SYSTEM OPTION in "System Software Operational Guide", Volume 
1, page 1-5-2 has been revised. The second paragraph has been corrected and now reads as 
f o I lows: 

When this option Is set, jobs are printed by order of the job number. When reset, jobs are 
printed in reverse order of print quantity. 
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D2585 BACKUP - "END" AS RANGE STOP INDICATOR 

The System Software Operational Guide, Volume 1, No. 5001563, should be corrected as follows: 

Page 1-7-3 

The syntax diagram for (range part> should be corrected to read as follows: 

(range part> 



l<- 



RANGE (number) (number)- 

I II II 

I -<s t r i ng>- I I- : -| |-(string>- 



I- "END" 



- EQUAL (number)- 

I 

I -( s t r I ng >- 



Page 1-7-7 

The semantic description of END should be corrected to read as follows: 

"END" Is a range stop indicator for an EBCDIC string (besides either (number) or (string)) 
which is equivalent to setting the stop integer to 99999999. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
BACKUP 



P1001 BACKUP - EXECUTE "BACKUP" WITH "RUN" STATEMENT 

BACKUP now works properly when executed directly with a RUN statement. The following two 
examples are equivalent: 

PB D 157 SAVE COPIES 3 

RUN SYSTEM/BACKUP ("D 157 SAVE COPIES 3"); 

PI 557 BACKUP - "QT" MALFUNCTION 

BACKUP will now print the remaining BD files after one has been QTed. 

P15B5 BACKUP - PRINTER SELECTABLE WITH REEL # > "1" 

PBing a backup tape, whose reel number is greater than 1, will now work correctly. Previously, 
the UNITNO attribute' would be lost and the print job would go to any available printer. 

PI 568 BACKUP - ERROR FOR COLON WITHOUT "ALGOL" KEY 

BACKUP would get a SEG ARRAY error for <keystart>-l or 2 and would get no output for <keystart> 
>=3 when a colon separated start and stop values of RANGE. A colon should only be used if the 
key is ALGOL. BACKUP now gives an error and the message "COLON WITHOUT ALGOL KEY" while 
scanning the input specification. 

PI 639 BACKUP - UNQUOTED STRING AS RANGE VALUE 

If a string used as a range value is not enclosed in quotes, an error will now occur. 

P16t0 BACKUP - PB "<FILENAME>" CP <UNITNO> 

An erroneous SEG ARRAY error would occur when both a filename and a card punch unit were 
specified (e.g., PB "PBTEST" CP12). Now, this valid statement executes properly. 

P9030 BACKUP - "BACKUP" VS. "GETSTATUS" 

BACKUP will now handle backup files that are created under a u9ercode when the BDBASE and 
BDNAME options are used. 

P9175 BACKUP - REMOVE EXTRA PAGE SKIPS 

Extra page skips before and after BACKUP prints a file have been removed. 
P9176 BACKUP - "SWAPPER" QT'S "BACKUP" 

BACKUP will no longer be QT'ed by SWAPPER when running in swapspace. 
P9198 BACKUP - NEW SYMBOLIC FOR " III.O" 

The III.O symbolic for BACKUP has been reformatted. 

P9199 BACKUP - CLEAN UP ERROR HANDLING 

BACKUP now terminates immediately upon encountering any syntax error in its input string, 
without attempting to print any backup files. 
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DOCUMENT CHANGES NOTES (D NOTES) 
BASIC 



D2280 BASIC - SCAN IN REPLACED BY "TIME INTRINSIC" 

The BCL function will now invoke the MCP procedure TIME INTRINSIC rather than executing the SCNI 
(scanin) operator. This change is made in the interest of hardware independence. 

Due to the additional overhead in calling an MCP procedure rather than just executing an 
operator, the BCL function will take longer to execute. 

D2H56 BASIC - QUOTES IN "REMARK" MUST MATCH 

Quotes appearing in a REMARK statement or in an apostrophe comment at the end of a statement 
must be matched. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
BASIC 



PI 657 BASIC - SYNTAX ERROR FOR UNDECLARED IMAGES 

Under certain circumstances, the compilers failed to give a syntax error for an image which was 
referenced but not declared in a program. If the program proved to be otherwise error-free, a 
codefile was produced which caused a system failure if executed. All undeclared images will 
now be flagged with error messages. 

Another problem, which involved an INVALID INDEX in the compiler when only undeclared images 
appeared in a proram, has also been corrected. 

P9104 BASIC - ERRONEOUS LINES WRITTEN TO "ERRORFILE" 

The BASIC compiler will now write the erroneous line images to the ERRORFILE in addition to 
error messages. Previously, the compiler wrote only error messages which indicated the line 
number in error. Occasionally, the compiler displayed the wrong line number. In an effort to 
correct this failure and improve error diagnostics, the offending line will be written, 
followed by the appropriate message. The line number will appear with the text for that line, 
rather than appearing in the error message itself. 

P9S00 BASIC - SYNTAX "IF END/MORE" CORRECTLY 

The IF END and IF MORE statements require a clause specifying a statement number for possible 
transfer of control. The correct syntax is: 

IF <END/MORE> <file designator> THEN <statemenl number) 

The compiler will now provide reasonable error messages when improper syntax is detected. 
Previously, syntax errors for these statements were misleading. 

P9201 BASIC - EQUAL PRECEDENCE FOR DIVISION 

Division now has the same precedence as multiplication, DIV.and MOD. Previously division had 
higher precedence, causing erroneous results in some expressions. 
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BINDER 



D2424 BINDER 
If 



■AUTOBIND" AND "PPB" 



a code file were produced by both compiling through WFL with SAUTOBIND set and compiling or 
binding through CANDE with label equation, the code file would be bad. This problem has been 
corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
BINDER 

P1H-66 BINDER - "SSTRICT" GIVES SYNTAX ERRORS 

Setting the STRICT dollar option now causes syntax errors for missing procedures specified on 
BIND cards. Previously, the STRICT option would only cause syntax errors if SL1ST or SWARN 
were also set. 

P9105 BINDER - LARGE HOST WITH SUBROUTINES 

When binding FORTRAN subroutines to a host consisting of a main program and several 
subroutines, the BINDER would get an INVALID INDEX due to using the wrong figure from the 
BIND INFO to index the stack building code array. The BINDER now uses the correct figure. 

P9106 BINDER - "USE" CARDS OBEYED 

The BINDER would sometimes ignore USE cards following the binding of a procedure for which the 
BINDER itself had created a USE statement; e.g., "STATEMENT REQUIRED: USE XXXX FOR YYYY". The 
BINDER now faithfully obeys all USE cards. 
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CANDE 



D2281 CANDE - MANDATORY RECOVERYFILE FILEKINDS 

oa^RI W 'i! "° | on 9er use a tankfile or recover a recovery file that was created by a pre-II.8 1 
CANDE. Also, these files must now have a f i I e k 1 n d of RECOVERYFILE to be considered valid. 

D2 L m CANDE - "MATCH" VERB 

The MATCH command compares two files and determines the different 
i i 

5) 



The MATCH command compares two files and determines the differences between them. Output 
indicating the result of the comparison may be directed to the terminal or to a new file The 
sy n t ax i s as f o I I ows : 



|< 

I 

— MATCH / * 1 \ — < o I d file> 

I 

I- TO <new f i I e > 

-/ 1 \-< s e qu e n c e range list> 

-/1\- » <start column> 

I 

I - - <end column) 

-/1\- SEQ — = <start column) 



•I 



I 

I- - <end col umn > 



■/ 1 \- : --<m<>.lch output options)- 



<match output options) 
FILE — < file name>- 



TEXT 



I l<- 



l<- 



I 
I 
I- , /1\— COMPARE 



I 

I I- RESULT —I 
I - I 
I- EQUAL 1 



SQUASHED - 
TRUNCATED 
COMPARE — 
EQUAL 



e compared with <new file). 



SEMANTICS: 

The MATCH command causes the <old file), or portions thereof, to b 
If a <new file) is not specified, the workfile is used by default. 

For sequenced files, if a record is encountered in each file having the same sequence number, a 
character by character comparison of the records is done. If the two records are found to 
differ, the <new f,le> record will be output as a replacement line. If a record exists at a 
sequence number in <old file) but does not exist in <new file), that record will be output as a 
deleted line. If a record exists at a sequence number in <new file) but not In <o I d file), that 
record will be put out as an inserted line. 

For unsequenced files, the first record of < o I d file) will be compared character for character 
with the first record of <new file), the second with the second, et cetera. 

Any two files that are MATCH'ed must be of the same type. 

II„!!. <S '?r nCe ra ? 9 * Iisl> .i! 'Pacified, the files will only be compared within that sequence 
range. If a column spec , f i ca t i on i s used (e.g.. • <starl column), etc.), the records will be 
compared w.lh.n that column rang. If the "SEQ" option i, used, the indicated co I umn "nJJ w i M 
ri '. sequence numbers for the comparison. The width of this sequence number may not 
exceed eight digits, and the option may only be used with DATA files. 
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The results of the comparison are formed according to the output options used. By default, 
output is directed to the terminal and lists only the sequence numbers. Line deletions are 
preceded by "-", line replacements by "R", and line insertions by "I". 

Two output options are available: 

1 . TEXT 

Output is directed to the terminal, with line deletions preceded by "-", replacements by 
"R", and insertions by "I". 

If the COMPARE option is specified, the results are similar to that of the "COMPARE" option 
in the LIST command . 

If the EQUAL option is used, records which are the same will be listed. 

If the SQUASHED option is used, any group of multiple blanks is reduced to a single blank 
for output of the record. 

If the TRUNCATED option is used, a line too long for the terminal is truncated to one 
terminal line. 

2. FILE <f i I ename> 

Output is directed to the specified file. The contents of the file are the same as those 
given for TEXT. The resulting file will be of type DATA. 

If the COMPARE option is used, the contents of the file are the same as those given for the 
use of COMPARE with the TEXT option. 

If the RESULT option is used, the result file will be the same type as that of the files 
MATCH'ed. 

For language source files, line insertions and replacements are put into the result file. 
Single line deletions are replaced by a "$" record. Multiple line deletions in sequence will 
cause output of a "$SET VOIDT" record at the starting sequence number and a "$POP VOIDT' at 
the ending sequence number. 

For DATA file comparisons using the sequence number column specification, line replacements 
and insertions are put into the result file. For deletions, a blank record is put into the 
file with sequence number intact. 

For DATA file comparisons not using the sequence number column specification, when records 
differ, the <new file> record is placed in the result file. If <new file> is longer than 
<old file>, trailing unmatched records are placed in the output file. If <old file> is 
longer than <new file>, the trailing unmatched records are not placed in the output file. 

If the EQUAL option is used, records which are the same will be placed in the file. 
EXAMPLES: 



MATCH ALPHA 

MATCH the file ALPHA to the workfile, listing only sequence numbers. 

MATCH WILDCATS TO OWLS ON TV29 

MATCH the file WILDCATS to the file OWLS on the pack TV29, listing only sequence 
numbers . 

MATCH ®20-30 A/B 

MATCH the file A/B to the workfile, matching only columns 20 through 30 inclusive, 
listing only sequence numbers. 

MATCH A TO B SEQ=10-17 

MATCH the DATA file A to the DATA file B; the sequence numbers will be found in 
columns 10 through 17 inclusive. 

MATCH YOURS TO MINE :F OURS 

MATCH the file YOURS to the file MINE, creating a DATA file called OURS which will 
contain the differences between the two files. 

MATCH OLDSOURCE TO NEWSOURCE : F FIX, RESULT 

MATCH the file OLDSOURCE to the file NEWSOURCE, creating a file called FIX which will 
contain source records for replacements and "VOIDT" or "$" cards for deletions. 

MATCH :T BAD TO GOOD 

MATCH the file BAD to the file GOOD, listing differences. 
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MATCH FLYERS TO ISLANDERS: T ,C 

MATCH ihe file FLYERS to the file ISLANDERS, listing differences using the COMPARE 

MATCH .20-30 Zl TO Z2 : T,T .SQUASHED, COMPARE 

MATCH the file Zl to the file Z2 , matching only columns 20 through 30 inclusive 
listing differences, truncating where necessary and replacing all multiple blanks by 
a single blank. 7 

D2508 CANDE - "CANDE" BACKUP FILE PROCESSING FACILITY 

The BACKUPPROCESS command will allow a user to create disk file copies of, identify remove and 
!: S Lc5 U ^Mi,l es :J a ? h Mi lts .'..^ f .»«racc S5 s Include back u p f i I e s created in ' hi s sesston 



on DISK and PACK under the *BD and *BP directories, bac k up f lies' cr e aU d in h f s" s e S s i o aS 
arbitrary disk family, and backup files in his directory. BACKUPPROCESS r a n t a ; n = =»ii n r n, 
features of the BDREMOVE command. BDREMOVE will be de- i mp I emenVed on a f u t ur e r e i ease 

As in the BDREMOVE command, each backup file referenced is presented to the user Prooer 
responses to a presented backup file are NEXT, REMOVE, WHAT, COPY and LIST. P 

The CANDE BACKUPPROCESS command Is implemented as a separate task, CANDE BACKUPPROCESSOR which 

communicates w,th the user via a remote file. Termination occurs when all backup fills 

task is 6 DS'ed *" * " ' ' indicalIon for the remote file is detected or the BACKUPPROCESS 

BACKUPPROCESS Command Syntax 

— BACKUPPROCESS I 

| |< , | 

! ' II 
I /1\ <directory name > I 

II | 

i I- ON <f ami I y name) -| 

I I 

|-/1\- : — REMOVE 1 



BACKUPPROCESS Command Semantics 

If REMOVE is specified, all backup files referenced will be removed without being presented. 

fMeT U nni!; a K e \ SP9 f!f ie V d i r ! Cl ?r? in lhe user ' s "Tary that is to be searched for backup 
fi es Only backup files found in this directory are presented to the user. The directory may 
only designate files in the user's library. meuirectorymay 

^BpS^U^.n!!!^ 8 ! 10 !- th8 U ? 8r l ° s P ecif y an arbitrary disk family to be searched for *BD and 
D" tiles created in his session. 

CANDE BACKUPPROCESSOR Syntax 
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NEXT — 
REMOVE 



I- ALL 



WHAT 



l<- 
I 



COPY /1*\- TO — < f I I e name) 

| -/ 1 \-< sequence range list>- 



l<- 



I I 
_ /lN _ . CARRIAGECONTROL 



NOCRUNCH 



LIST 



I l<- 
I I 



-/ 1 \- • <start col> 



I 



|- - <end col> 
-/ 1 \-<sequence range I i s t > 

,< . 1 

_ m _ . TRUNCATED 



I - I 

SQUASHED 1 

I 
UNSEQUENCED -I 



CANDE BACKUPPROCESSOR Semantics 



NEXT 

NEXT will cause the next file to be presented. 

REMOVE 

REMOVE will cause the presented file to be removed, 
will be removed without being presented; otherwise, 



If ALL is specified, the remaining files 
the next file is presented . 



COPY 

COPY is used to create a disk fi.e copy of the P-sented bac kup f i I.. This d..k_ f.1,^1. 

-n'lt si.!.. :iv\*i &? e i?;i :s* h ;:rf r .;:: r d , .? , ^,!: B :::.rt. ■„ u3 e by an ex is tin 9 „,.. 



BLOCKS 1ZE 
translated 



of 270 
to EBCDIC 



words and an 
if necessary, 



The disk file created will have a MAXRECSIZE of 30 words, a 
AREASIZE of 50^. Each record from the backup file will be 
and padded on the right by blanks to fit a 30 word record. 

t:.-i:i,;- s::»:T::-:.'i::*: , tt.-?TS f:.::s:;:T:.;::*:::.?!:i.:: is:*:!:s":i:I.::":;::-*:: 

disk file. 



to be encoded in 

of each record will 

nee blank records 

i nf orma I ion will be 

191 ) , to a I I ow easy 

control of BDDATA files and 

not contain column 1. With 

, t ■,„ th. renresentation of the BD file, or portions thereof, may easily be recreated if 

d.ilr.d! H'the *t\\l\l a BP i\\l. the CARRIAGECONTROL option will be ignored. 



not reformat them, unless a column range Is specified which does 



If the CARRIAGECONTROL option is not used or the file 
disk file record will be the first character of data 
made DATA. 



is a BP 
and the 



file, the first 
f i I ek i nd of the 



character 
disk file 



of each 
will be 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 CANDE 



MARK 3.0 PAGE 30 

"sequence number" equal lo the record number multiplied by 1 00 ( i e . 1 00 , 200 ,300 . . J 9 ' 
Note: Sequence ranges are not allowed with old backup files. 
The same backup file will be re-presented after it is copied. 
WHAT 

\:°ni k nt,:i Jrt.':;fj"S,::":/Si.;f:;.:'i! j:.r't:!:f:s.fi:'i. T j:.?r:tt:. ! ' -" ;:: - ::: " :: 

LIST 

LIST will I isl the presented backup file, or portions thereof, at the user's terminal 
translat,ng each non-graphic character to an EBCDIC question mark, "?". terminal, 

An entry in the backup file with "SPACE 2" carriage control will be counted as two records If 
the entry contains no text, two blank records will be listed If the ent ru r««T. • »! ? i ' 
blank record will be listed. All other entries .1 e counted a o e r orS and I sted "ll 
such. Entries that do not contain text will be listed as blank ,r L ., i*2 
wi . be preceded by its "sequence number", (unless t h. tuNSEQUENCED ' i s d \ V » 
data file were being listed with the normal CANDE LIST command. ' aS ,f a 

Note: Sequence ranges are not allowed with old backup files. 

Iv r fh! rn55 of ^cord counting and sequence numbering means that a disk file which is created 
nn y -i-n ? k ?P*'on «nd I sled later with a normal CANDE LIST command will appe ar exac t I y as t h e 
or, g ,nal backup file would appear when listed with the BACKUPPROCESS LIST option. 

The column range specifications, and the TRUNCATED, SQUASHED and UNSEQUENrm „w, B . f i- 

m u oU-*J: r lhe normal CANDE LIST command - The <»!-"-S, u us?™ s 3Sic?v:.d f f" fc is: 

The same backup file will be re-presented after it is listed. 
D2509 CANDE - PARAMETERS TO "START" JOBS 
The ability to pass parameters to CANDE START jobs has been implemented. 

Syntax: 

-- START __ , 

— I | | '" " i"" 1 

l-<file name>-- 1 | _ ? « <character> -| 

I 
I- ( <parameters> ) -| 

<parameters> is any arbitrary list of constants (i.e., integer, real strina or R on |«»„i 
separated by commas recognized by WFL. See WFL note D2514 for'a d I ,e". I on • J ?Sb parameters 

D2544- CANDE - LISTING TERMINATION WITH "BREAK ON OUTPUT" 

•*??«■" 99 m^^^ m l-^ e l K ny ..i iSt , in9 fun f tion (! -»-. LIST, FIND:T, FILES, etc.) upon receipt of 
a Llass 99 message with the "break on output bit" on if there were no message to recall. 

DP552 CANDE - USERLIMIT FOR SCHEDULE SESSIONS 

;.::;.;:!i:-.SS IB IJ- X^cSi^ 1 -,:::^™ ;::;■::; :::s f :i.::r::\.:\?.."!j:: 
::::::?::•.;■:»::;: :e:%:;:«::;; j';.. 9 ™^..:?::::- •"' ■■■' ■"" •••"•«'» ":: 

Syntax: 
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— ? 



SCHEDULE 



-< I imi t> 

- ALL 

- QUEUED 

- ACTIVE 

- HEAD <schednum> 

- TAIL -I I- OVERRIDE — 

- STOP — <schednum> 

- FIND 

- USERLIMIT <user limit>- 

III 

|- = -I I- NONE 



If <user l!mit> is specified, it must be a non-zero u ns I gne d i n t e ger number . 1 1 may 
than <limit>; however, if it is larger than the max i mum number of SCHEDULE st a , on s 

<user limit> accordingly. Specifying a USE.KL1M1I other 
starting a SCHEDULE session for any user who already 
currently active. SCHEDULE sessions in excess 
a current session for that user finishes, or the operator 



service, CANDE will I ower 
will prevent CANDE from 
or more SCHEDULE sessions 
remain scheduled until 
value of USERLIMIT. 



has 
< user 



be larger 
CANDE will 
than NONE 
user I i m i t > 
i m i t > will 
raises the 



When USERLIMIT is set to NONE, CANDE will start SCHEDULE sessions in 

scheduled without regard to how many schedule sessions are a I re ad y r unn , ng for any 
which SCHEDULE sessions were started prior to 1II.0 CANDE. 



the order that they are 
user. This 



s the manner in 



The value of USERLIMIT is saved in CANDE • s TANKFILE ••»2X»«»£»» d ov ? . tawkfuF r 
the default setting for USERLIMIT when creating a new TANKFILE or using a TANKFILE c 
pre III .0 CANDE. 



ha! t load 



NONE i s 
reated by a 



Examp I e : 



?SCH 

•SCHEDULE LIMIT=5 NO USERLIMIT 

?SCH USERLIMIT = 1 

#USERLIMIT=1 

?SCH 

•SCHEDULE LIMIT=5 USERLIMIT=1 



?SCH 

♦SCHEDULE LIMIT=5 USERL1MIT=1 ACTIVE=3 READY=3 

?SCH ALL 

#00054 SN=3884 USERA 

#00060 SN=4217 USERB 

#00059 SN=4197 USERC 

#00055 WAITING USERA 

#00056 WAITING USERA 

#00057 WAITING USERA , „„.„„ -, 

#SCHEDULE LIMIT=5 USERLIMIT=1 ACTIVE=3 READY=3 

?SCH USER a 

#USERLIMIT-2 

?SCH ALL 

#00054 SN-3884 USERA 

#00060 SN-4217 USERB 

#00059 SN=4197 USERC 

#00055 SN-4311 USERA 

#00056 WAITING USERA 

#00057 WAITING USERA „,.,.,,- , ™-.,™ n 

•SCHEDULE LIMIT=5 USERLIMIT=2 ACTIVE=4 READY=2 
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SOFTNARE IMPROVEMENTS NOTES (P NOTES) 
CANDE 

P1002 CANDE - STORE LENGTH OF "FIND/REPLACE" 

CANDE was failing to enter the length of a FIND/REPLACE command in the scratch block, sometimes 
causing both a lank block to be destroyed and CANDE to loop. This has been corrected. 

PI ION- CANDE - EMPTY BUFFER SIZE IN "TERMINAL" COMMAND 

CANDE will now c or r ect I y hand I e options following a BUFFER option with an empty size 
specification in the TERMINAL command. ' 

Example 1 

TERM B S 
CANDE will now set "SCREEN" rather than ignore it. 
Example 2 

TERM B P 24 
CANDE will now set the page size to 24 rather than give the error "SYNTAX ERROR. SCANNING 

PI 105 CANDE - NONGRAPHIC CHARACTERS IN "?SS" AND "?TO" 

CANDE will now translate all nongraphic characters (except BEL, 4"2F") in "?S<;" anrt "?Tn" 
commands to the EBCDIC "?" character. 

PI 106 CANDE - COMPILE TIME TASK ATTRIBUTES 

CANDE will now give a syntax error for compile-time task attribute assignments which cannot be 
passed to a compiler. Previously, these assignments were ignored. 

PI 107 CANDE - INCORRECT STATISTICS 

An inconsistency in CANDE ' s internal statistics accumulation mechanism has been corrected. 
PI 234 CANDE - CONFUSION WITH "7REPEAT" AND "7REP0RT" 

CANDE will no longer interpret a 7REPORT command in a SCHEDULE session as a 7REPEAT command. 
P1235 CANDE - BEFORE OPTION IN "7ENTER" VERB 

The BEFORE option of the 7ENTER verb now works correctly. The item beinq entered will no 
longer cause another item to be deleted. 

P1497 CANDE - "7QUIT" FAILURE 

A problem with 7QUIT failing to cause CANDE termination has been corrected. 

P1498 CANDE - INCORRECT DESTINATIONS FOR "7REPORT" MESSAGES 

If two usercodes were greater than 5 characters in length and differed ony in the last 
character, 7REP0RT messages from either would be received by both. This has been corrected. 

P1499 CANDE - INCORRECT ERROR MESSAGES 

A problem with incorrect error messages being issued due to duplicate entries in an internal 
value array has been corrected. 

PI 500 CANDE - STATE DUMP PROBLEMS 

A problem with recurring state dumps has been corrected. 

P1501 CANDE - "REP, RET, TAKE, ENTER" WITH "CONTINUE" 

rLinr CAND ^ J COmmand contained a continuation character when no character had been assigned. 
CANDE wou Id respond with an error message. If the CONTINUE command were then used to specify a 
continuation char act er whi ch was followed by a RETRIEVE and REPEAT of the original command 
which was m error, CANDE would fail to remove the continuation character from the text of the 
command, causing another error. This problem has been corrected. 
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P1502 CANDE - LONG FILE EQUATIONS WITH COMPILES 

?W5 e .;::i,:::."«;: {!:.::;:'.::;•!-:::::: s: •.•M4 , aa**-.Jr:J , ?.-;ti'afiii'.::;i..::- 1 - " 

P1503 CANDE - SPECIAL CHARACTERS IN "UTILITY" TEXT 

s;^;s:?;^.:{r^{:^^:::.'^:::"^!:.!.":^«I , «^■:«'"'' : "'"■ : • K " , •''■"" :5 •' 

PI 656 CANDE - LOST RECORDS WITH "MOVE" OR "INSERT" 
CANDE will no longer lose workfile records with a MOVE or INSERT command. 

Examp I es : 

MOVE <sl> - END TO <s2> + <inc> 
INSERT <sl> - END AT <s2> + <inc> 

The above examples will no longer lose the re c or d f rom <s2> t o the end of the file if <sl> I. 
larger than the sequence number of the last record of the file. 

P9107 CANDE - INCORRECT "GRINDLIMIT" SETTINGS 

CANDE will no longer process more GRIND stacks than specified with the GRINDLIMIT command. 
P9108 CANDE - "PRIVATE" SECURITY IN "MAKE" COMMAND 

CANDE wil, now correctly set the security type of the workfile to PRIVATE if PRIVATE is 

specified in the MAKE command. 
P9300 CANDE - ELIMINATE "HOLDQ" PROBLEMS 

Problems with the HOLDQ mechanism involving asynchronous tasks which have done a foreign file 

open on the station have been eliminated. 
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D2259 COBOL - DECIMAL ACCURACY IN COMPUTE STATEMENT 



as '7 r yjt ?? lh °K-°I anal i; zin 9 arithmetic expressions in compute statements is now available 

.,:.,' :::::., :; , f..::;: , !::.':;!;::.::j-.:;j.::;i::'i:! l :r:f:» ;!:;;::;'%-,;?: ;;: 

ne hod .h ?e h n0t Pr K°f U r ^ 6 ?C ealer tIm ° a "« -»™<>ry requirement; asso ?ated Lj 



D2284 COBOL - "SIGN" CLAUSE 

The specification of "TRAILING SEPARATE CHARACTER' 
a I lowed. 

D2500 COBOL - GLOBAL DATA BASES 

The order in which stack locati 



signs for usage DISPLAY items 



ALGOL and COBOL comp i I ers ', " pr even t " " ~ " - ' '-- - ' ° - - *?'■* ^" 3eS - " 8 diffe ""t "elween the II. 9 
bases . 



"9 



- l.j. — uotwoen tne 11,3 

mixed language binding of programs accessing global data 



change has been made in the order 



Consequently, a cnange nas been made in the order in which the COBOL compiler assi , fl , st ac 
i:::s i :hich f :i,, d ^ a bo b unrioq:th:r: n9 —"">'">" ° f •" COBOL programs Sccesslnl^^ba, 3 ^? 



stack 

a 



D2521 COBOL - FLOATING POINT DATA DECLARATIONS 



Th 



he usage declarators, COMP-4 and COMP-5, are now prohibited in the data descrintinn . „ <. r „ „ f 
roup item; they are allowed only for elementary items. descr,pt,on entry of a 




D2522 COBOL - STATISTICS DOLLAR OPTION 



When the "STATISTICS" 
uses the "TIME(12)" 
time). 



dollar option is set, the compiler generated code for timing purposes now 
function (processor time) rather than the "TIMEtlD" f unc t i on ( e I apsed 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

COBOL 
PI 003 COBOL - PROGRAM PORTABILITY 



Messages warning of program non-portability are now issued for the declaration of BCL internal 
data or for compiling a program at a lex level above 15. 



The listing for SSTATISTICS n o w i d e n t i f i e s the associated block (paragraph) name by including 
the name with the number. Previously, the listing said ALIIVL LLULK . 



P1004 COBOL - BLOCK NAME FOR "SSTATISTICS" CODE LISTING 

The listing for SSTATISTICS n o w i d e n t i f i e s the ass 
the name with the number. Previously, the listing 

P1005 COBOL - RESERVED WORD IN ARITHMETIC STATEMENT 

Some reserved words used incorrectly in an ar i t hme t i c s t a t erne n I ; e.g., SUBTRACT INDEX FROM 
INDEX, no longer cause the compiler to discontinue with an INVALID INUtX. 

PI 006 COBOL - "INVALID INDEX" ON "WAIT" STATEMENT 

The COBOL compiler no longer gets an INVALID INDEX while attempting to compile an erroneous 
WAIT statement. 

P1007 COBOL - OPTIMIZED "PERFORM" STATEMENTS 

A problem with in-line perform ranges, which occurred in rare instances when "OPTIMIZE" was 
set, has been corrected and no longer causes spurious syntax errors. 

P1043 COBOL - NUMERIC TEST FAILED TO CHECK SIGN FIELD 

COBOL numeric test now checks on the sign field for COMP-2 items. 

PI 044 COBOL - INCORRECT TIME GENERATED BY "ACCEPT" 

The COBOL ACCEPT FROM TIME statement now generates the correct time in the hundredths of 
seconds places. 

PI 088 COBOL - SEMICOLON IN "NEXT SENTENCE" AND "LOCK" 

In the following COBOL statement, the semicolon after the NEXT SENTENCE phrase was erroneously 
not allowed: ' 

IF < condition^ THEN NEXT SENTENCE; ELSE STATEMENT-2 

the semicolon preceding the AT in the LOCK statement was 
erroneously not allowed. This has been corrected. 

PI 089 COBOL - "INVALID INDEX" BY "LOCK" STATEMENT 

The LOCK statement no longer gives an INVALID INDEX in the compiler. 

P1090 COBOL - "RERUN" STATEMENT BRANCHED INCORRECTLY 

Branch in RERUN code now branches to the correct code syllable; previously, it would delete the 
stack word needed for an I/O test. 

PI 091 COBOL - CODE LISTING 

The readability of the code listing has been improved. 

PI 092 COBOL - PREVENTION OF INTEGER OVERFLOW 

A procedure has been added to the compiler to check a numeric literal before trying to use the 
INTEGER function to convert to an integer. 



PI 093 COBOL - XREF GIVING WRONG SEQUENCE NUMBERS 

The Xref list had items listed as occurring on lines where they did not occur as 
listing the lines on which the items did actually occur. This has been corrected; th 



as well as 

ere is now 
g I: He lines on wn i c n t no i i em a u , ■■ - - ...— .... - 

one listing for each actual occurrence. 



PI 145 COBOL - RECOGNITION OF NUMERIC LITERALS 

The compiler is no longer confused when a non-integer numeric I I lira I appears in the r'9 h | m °^ 
positions of a card i 
non-blank character is ar 



The compiler s no longer contusea wnen a non-mtego. uw ' " .■■...». -kk--'. - --- •■* ;.„, 
positions of a card image and the next card image is a non-c o n t . n ua t , o n card whose first 
• >n "E". 
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PI 146 COBOL - INVALID LEVEL NUMBERS 

The specfication of illegal level numbers no longer can cause the compiler to abnormally 
terminate. ' 

PI 147 COBOL - "PERFORM" STATEMENTS 

The correct name of the offending procedure-name is now listed with error messages relating to 
invalid transfer of control for PERFORM statements. 

PI 148 COBOL - "COPY" STATEMENTS 

The compiler no longer fails to properly handle COPY statements specifying internal library 
names with an embedded hyphen. 

PI 149 COBOL - "XREF" 

References to data items by REDEFINES and RENAMES clauses are no longer omitted from the cross 
reference report. 

PI 150 COBOL - PROGRAM COLLATING SEQUENCE CLAUSE 



a program collating sequence clause is present in the object-computer paragraph and the 
ementary alphabet-name declaration is missing, the compiler no longer fails to emit a 



When 

supplen.oni.aijr ■■ i p ii a u o i -ii miio utuji ilium is m i 3 s i n g , tne compiler no long< 

syntax error, 



PI 151 COBOL - UNNECESSARY CODE GENERATION 

Unnecessary NOOP operators are no longer occasionally emitted prior to NAMC operators 
referencing character descriptors. 

PI 152 COBOL - UNDIGIT LITERALS IN "VALUE" CLAUSE 

The compiler no longer terminates with an INVALID INDEX when attempting to compile a 
syntactically invalid VALUE clause that specifies an undigit literal in the data description of 
an item declared subordinate to an item with an OCCURS clause. 

PI 158 COBOL - GENERALIZED FILE SPECIFIER IN "USE" SECTIONS 

The compiler no longer fails to detect an illegal perform of a part of a USE section in the 
declaratives that references the generalized file specifier. 

PI 159 COBOL - "TIME" INTRINSIC 

The compiler will no longer fault with an integer overflow if a large number is used as an 
argument to the TIME intrinsic. 

PI 160 COBOL - LISTING OF OMITTED SOURCE LANGUAGE LINES 

The compiler no longer fails to list lines that have been omitted. 

P1237 COBOL - SIZE ERROR CODE OVERWRITTEN 

The compiler no longer overwrites good code used to check size error in ADD. Initialization 
code for size error checking was being overwritten, allowing spurious size error condition code 
to be executed. 

PI 240 COBOL - "XREF" 

References to data items In the USING clause are now listed in the cross reference report. 
PI 282 COBOL - "ADD" STATEMENTS 

Incorrect code is no longer sometimes emitted when a data-name subscripted by a constant is 
used as a source operand in an ADD statement. 

P1285 COBOL - LITERALS IN LOCAL STACK 

Certain literals were stored in the Dl stack for efficiency; however, binding multiple 

separately-compiled programs wastes space with duplication of stored literals. Now, any 

programs compiled at level 3 or higher will store these literals in the local stack for that 
program. 

PI 380 COBOL - CONOITION NAMES 

The code generated to evaluate condition-name conditions for variable length conditional 
variables has been corrected. 
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PI til COBOL - "MONITOR" 

Paragraph names listed in a MONITOR statement, but never occurring in the procedure division, 
no longer cause the compiler to abnormal 1/ terminate with an INVALID INDEX. 

P1413 COBOL - "SET" STATEMENTS 

Non-integer numeric literals are no longer acceptable as source operands in SET statements. 

P1504 COBOL - "STATISTICS" OPTION 

Timings for interrupt procedures are now included in the summary report produced by the 
STATISTICS option. 

P1507 COBOL - SYNTAX GROUP COMP ITEM USED AS SORT KEY 

An item declared as group computational should not have been allowed to be used as a key to the 
sort intrinsic. The compiler now syntaxes any attempt to use a group computational item for a 
sort key. 

P1510 COBOL - GLOBAL DIRECT FILES PASSED TO "ISAM" 

Epilogue procedures no longer cause global direct files to be closed. 

P1538 COBOL - SET DYNAMIC FILE ATTRIBUTES OF "SORT" FILES 

Files with dynamic attributes, when used by SORT, were not getting those attributes set at open 
and close time during a SORT. These attributes are now set when sorting. 

P1539 COBOL - MOVE SCALED INTEGER TO ALPHANUMERIC DISPLAY 

An item declared as an integer with assumed decimal scaling (edit character 'P') may now be 
moved to items declared alphanumeric display. Formerly, this was erroneously disallowed. 

PI 540 COBOL - INDEX DATA NAMES 

Invalid offsets are no longer calculated for display data items declared subsequent to index 
data items which are, in turn, declared subsequent to odd-length COMP-2 data items in a display 
record. 

P15B7 COBOL - "ANSI74" DEFAULT WRITE AFTER ADVANCING 

The compiler defaulted to "WRITE BEFORE ADVANCING" when the ADVANCING clause was not explicitly 
staled. The ANSI74 standard states the default should be "WRITE AFTER ADVANCING". Under the 
ANSI 74 dollar option, the compiler will default to "WRITE AFTER ADVANCING"; without this dollar 
option set, the compiler will default to "WRITE BEFORE ADVANCING". 

P1604 COBOL - LINAGE LINES CLAUSE LEFT "I/O" RESULT ON STACK 

I/O done to satisfy ANSI74 linage lines clause was leaving I/O result on top of slack, which 
could cause spurious errors, especially in performs. This has been corrected. 

P1B07 COBOL - REPORT WRITER 

Record areas obtained for report files are no longer sometimes larger than necessary. 

PI 641 COBOL - VALUE CLAUSE 

The compiler no longer incorrectly allows the value clause in the data description entry of a 
data item in a record description for a sort file when the B2500 system option is set. 

P1648 COBOL - ILLEGAL SYNTAX FOR "READ" NOT CAUSING ERROR 

The COBOL READ statement does not allow the following. syntax: 

READ <filename> NEXT KEY IS <data-name> 

Previously, the compiler failed to give a syntax error for this; now, the compiler syntaxes 
this as an unrecognized construct. 

PI 649 COBOL - "NEXT SENTENCE" IN "INVALID KEY" 

The ANSI74 Standard specifies that the INVALID KEY phrase be followed by an imperative 
statement. It does not allow the NEXT SENTENCE phrase as is the Burroughs extension without 
the ANSI74 dollar option. The tree-driven code, activated by the OPTIMIZE dollar option or by 
compiling the compiler with the TREEDRIVEN dollar option, erroneously still allowed this 
extension. Now with the ANSI 74 dollar option, the NEXT SENTENCE phrase is always syntaxed. 
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P1650 COBOL - "OPEN EXTEND" LEAVING "I/O" RESULT ON STACK 

An OPEN EXTEND statement inside a perform range no longer causes a perform range to fail to 
return, since an I/O result was being left on the stack. 

P1654 COBOL - SEQUENCE DOLLAR OPTION NOT READING INCREMENT 

I^Fn E ?nn!lnn" op i'? n with lnertm.nl was being syntaxed incorrectly; e.g., it would disallow 
SbtU 1UU+1UU". This has been corrected. 

P1655 COBOL - "ACCEPT" USING INCORRECT QUALIFICATION 

ACCEPT referenced the r e ce i v i ngda t a item improperly, so that the correct qualification would 
not a ways occur. The ACCEPT referencing by the compiler has been changed to ensure proper 
qualification. r r 

P9067 COBOL - CONSTANT SECTION COMPUTATIONAL DATA ITEMS 

Incorrect code is no longer generated for all references to constant section computational 
.terns which had been used as sending operands in a MOVE statement to an alphanumeric data item. 

P9111 COBOL - "STRING" GET ERRONEOUS SYNTAX ERROR 

The COBOL compiler no longer gives an erroneous syntax error on the STRING statement when a 
semicolon is included before the ON OVERFLOW phrase. 

P9112 COBOL - GROUP COMPUTATIONAL DATA ITEMS 

TMSiiMK^MnrS^T 8 " * 3 l ° character-oriented group computational data items no longer cause an 
INVALID INUtX at run time because character offsets are used to index word descriptors. 

P9194 COBOL - MULTIPLE "COPY" STATEMENTS 

The I ibrary f i le kind attribute has now been reset to its default value of "VALUE (DISK) " so 
that a LUPT statement not explicitly referencing a family does not request files on a family 
specified by a previous COPY statement. ' 

P9195 COBOL - INCLUDE SIZE IN GLOBAL ARRAY ITEM DESCRIPTION 

COBOL no longer fails to include the size of a global array in the item description in the 
program description. 

P9299 COBOL - "SEG ARRAY" TERMINATION OF COMPILE 

A potential cause of a SEG ARRAY terminaton has been eliminated when compiling a large librarv 
with numerous "88" levels. ' 
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DOCUMENT CHANGES NOTES (D NOTES) 
CONTROLLER 



02267 CONTROLLER - FOUR VS THREE DIGIT SYSTEM SERIAL NUMBERS 
All systems e rial numbers have been expanded to allow four-digit numbers. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
CONTROLLER 



P1336 CONTROLLER - "MCS" MESSAGE CAUSES "SEG ARRAY" 

It!' C ncJ^khP wiM now checl< the len 9 th ° f ^e USERCODE in an Input message from an MCS. If 
the USERCODE ,s greater than 17 characters in length (illegal USERCODE syntax), the message 

• Ml be discarded, s 

P1399 CONTROLLER - "DIR" VS. INPUT SCANNER 
The CONTROLLER will now fire off SYSTEM/FILEDATA correctly when the following request is made: 
"DIR NAME= <packname>" . 

If more than one "blank" appears on either side of the equals side, the string will now be 
properly passed to FILEDATA. 

P1H07 CONTROLLER - "PD" EQUAL VS. NONRESIDENT FILES 

The SPO request PD= or PD <directory name>/= will now display "NULL FILE" kind for all 
non-resident files. This is due to the fact that the FILEKIND of a non-resident file cannot be 
guaranteed as different versions of the same file title can be of different file kinds. 

The FILEKIND of any non-resident file and all its versions can be found by enterina PD 
<filename>. / s 
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DOCUMENT CHANGES NOTES (D NOTES) 
DATA COMMUNICATIONS 



D2H77 DATACOM - DATA COMM SUBSYSTEM ENHANCEMENT 

The Data Comm Subsystem has been enhanced. See the attached User's Guide for details of 
implementation. 

D2545 DATACOM - "DCRECON" NO LONGER VISIBLE 

DCRECON is no longer a visible stack. DCRECON will now only appear on the mix page when it is 
awaiting an RSVP . In addition, DCRECON will no longer be scheduled, thereby speeding the exit 
of job awaiting DCRECON to clear da t acorn output prior to completion of a DS. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DATA COMMUNICATIONS 



P1492 DATACOM - PREVENT "DCSTATUS" DUMP WITH EXTENDED TOGS 

DCSTATUS was faulting with an INVALID INDEX due to an error in the tables returned to it by the 
MCP when extended toggles and tallies were used. This problem has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DCALOOL 



PI 651 DCALGOL - LEFT TYPE TRANSFER FUNCTION 
The left type transfer function will now allow MSGARRYIDS and MSGID. 
Example: 

BOOLEAN ( MESSAGE I D 1 3 1 ) : =TRUE ; 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DCP PROGRAM GENERATOR 



PI 009 DCPPROGEN - IMPROVED SWITCHED LINE HANDLING 

The DCP was occasionally Ignoring loss of carrier condilions when "LOSSOFCARRIER=DI SCONNECT" 
was specified. This could cause a disconnection to be ignored, and data terminal ready (CD) 
left true. This problem has been corrected. 

PI 143 DCPPROGEN - "LINE INTERROGATE" 

The LINE INTERROGATE DCWRITE function was not working properly for full-duplex lines. This 
problem has been corrected. 

PI 197 DCPPROGEN - FULL DUPLEX STATION NOT BUSY 

If a station on a multi-drop full duplex line went not ready (by MCS control or terminate 
error), the entire line could be suspended indefinitely. This problem has been corrected. 

PI 360 DCPPROGEN - CORRECT ADDRESS USED AS A BYTEVARIABLE 

When accessing the station address characters with the NDL bytevariable ADDRESS, DCPPROGEN was 
emitting code which incorrectly fetched the transmit address when the receive address was 
requested and vice versa. 

Examp I es : 

CHAR=ADDRESS (TRANSMIT) C 1 3 

Was fetching byte 1 of the receive address 
CHAR=ADDRESS(RECEIVE) [ 1 1 

Was fetching byte 1 of the transmit address. 

This problem has been corrected; now, the proper receive or transmit address characters are 
accessed. 

P8993 DCPPROGEN - "DCP" FAULT REPORT 

The MCP could overlook a reported DCP fault and show that the DCP was off-line instead. The 
problem has been corrected. 

P8999 DCPPROGEN - "INITIALIZE RETRY" WITH "LOCAL TABLES" 

Execution of "INITIALIZE RETRY" in a line control routine would fail if the LOCALTABLES option 
were used. This problem has been corrected. 

P9050 DCPPROGEN - "TERMINATE BLOCK" 

Performing TERMINATE BLOCK in receive request could cause an END OF BUFFER condition on a 
subsequent STORE operation, even if a GETSPACE had been performed. This condition was 
occurring in the READPAPERTAPE request set. The problem has been corrected. 

P9266 DCPPROGEN - CORRECT FETCH STORED TEXT 

Using the FETCH statement to examine stored text on a switched line could cause the text area 
of the input message to be altered. This problem has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DCP TEST GENERATOR 



PI 094 DCPTESTGEN - "SNEWSEQERR" OPTION 

DCPTESTGEN will no longer get an INVALID. INDEX faull when handling the NEWSEQERR option. 

PI 108 DCPTESTGEN - REQUIRE GOOD PARITY ON DISK 

DCPTESTGEN will now terminate abnormally upon encountering an unrecoverable parity error when 
reading a temporary dish work file. Previously, such a parity error would cause DCPTESTGEN to 
go immediately to normal end-of-job. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DCSTATUS 



Pmi DCSTATUS - "DCPANALYSIS" OUTPUT REFORMATTED 

The DCPANALYSIS part of DCSTATUS was getting a SEG ARRAY fault at sequence number 01H52000 when 
it attempted to analyze four or more DCP ' s . This problem has been corrected by printing the 
analysis for each DCP (or pair of DCP's, if exchanged) on a separate line. The formatting of 
remote output has also been improved in several instances. 

PI \H2 DCSTATUS - "TERMINAL MAXINPUT/MAXOUTPUT" INFORMATION 

DCSTATUS was reporting the value of MAXOUTPUT AS "BUFFER". It has now been changed such that 
the value of MAX INPUT/BUFFER is reported as "MAXINPUT" and MAXOUTPUT AS "MAXOUTPUT" when 
providing TERMINAL information. 
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DIAGNOSTIC MCS 



PI 578 DIAGNOSTMCS - INVALID CASE INDEX IN "STASTATECHNGR" 

The procedure STASTATECHNGR, which is called to handle the "READY" command (among others), will 
now give a "MISSING <STATION I.D.V error message if "ALL" is specified as the <stalion id>. 
Formerly, DI AGNOSTICMCS terminated with an INVALID INDEX feult. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - GENERAL 



D2519 DMS 1 1 - USE OF "ADDRESSCHECK , CHECKSUM" 

The following system note documents an existing feature which has not been previously 
documented. 

ADDRESSCHECK is a DMSII feature which is invoked for a data base using the DASDL OPTION 
statement. Use of the ADDRESSCHECK option is very strongly recommended, because it provides 
extremely inexpensive protection from certain types of hardware failures. ADDRESSCHECK causes 
one extra word to be added to the end of each block of all data base data files. This extra 
word contains the block address of the block. When a block is read by the ACCESSROUTINES, the 
addresscheck word is checked to see if it equals the block address. If it does not equal the 
block address, some sort of data corruption has occurred (such as an undetected frame shift in 
the middle of reading the block). A fatal integrity error is then given by the ACCESSROUTINES. 

CHECKSUM is a physical option, which means it can be set on a structure-by-structure basis. It 
can also be set as a global DASDL default using the DEFAULTS statement. CHECKSUM causes an 
extra word to be added to each block of a structure for which it is set (in addition to the 
addresscheck word, if any). The CHECKSUM is checked when a block is read from disk by the 
ACCESSROUTINES, and is recomputed before writing the block back to disk (if the block is 
updated). The CHECKSUM makes the probability of detecting any data corruption in the block 
extremely high; therefore, its use is strongly recommended. 

Delecting data corruption when it occurs is vital, for if it is not detected until later, any 
rebuild or reconstruct using the DMSII audit trail will restore the corruption. For this 
reason, the ideal way to run is with both ADDRESSCHECK set and with CHECKSUM set for each 
structure. (CHECKSUM may not detect an error if the hardware starts a read at an incorrect 
segment address which happens to start on a block boundary.) 

CHECKSUM may conveniently be added to an existing data base using the DMSII REORGANIZATION 
package, since it can be added to one or a few structures at a time. Adding ADDRESSCHECK is 
less convenient, because it applies to all structure or none; therefore, it cannot be added to 
an existing data base by the REORGANIZATION package. The data must be transferred to another 
data base (of otherwise identical descrption) in which ADDRESSCHECK is set. 
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DMS II - ACCESSROUTINES 

D22H-4 ACR - LIMIT ERROR 

A limit error on unordered and random data sets was "permanent"; i.e., 
operation increased the number of rows, the limit error persisted, 
notice that the file has been enlarged, and the limit error condition 

D2277 ACR - "SEGDESC ABOVE" 

The S option SEGDESCABOVE has been employed to ensure that all Dl 
referenced by lRW's can be accessed for very large data bases. 
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Now, the ACCESSROUTINES 
is corrected. 



items which must be 



D2278 ACR - DISPLAY STRUCTURE NUMBER 

The display produced during compilation of ACCESSROUTINES (when ACRDISPLAY $ option is set) now 
includes the structure number as well as structure name. 

D2279 ACR - ELIMINATE WARNING IF NO LOGICAL DATA BASES 

A warning is no longer emitted when compiling the ACCESSROUTINES if the data base has no 
logical data bases. 

D228B ACR - PATH FIXING CONSISTENT 

When the record referenced by a program's path is deleted (by that program or any other), its 
path must be adjusted. This path adjusting cannot be perfect without incurring excessive 
overhead; therefore, the following definition is made for structures with a logical ordering 
(index-sequential, ordered list and ordered data sets): 

FIND NEXT will produce successive records in the collating sequence of the index, although 
some records added after the record was deleted may be skipped. 

FIND PRIOR will produce all records in the collating sequence of the Index prior to the 
deleted record, although some records may be retrieved which are later in the collating 
sequence than the deleted record. 

Previously, the above definition held in most but not all cases. Now it holds in all cases. 

The above may be clarified by an example. Consider an index sequential set S with keys A, K 
and Z stored. 

1. Consider a program with a path to the set pointing at K. FIND S would retrieve the record 
with key K ("record K"). FIND NEXT S would retrieve record Z. FIND PRIOR S would retrieve 
record A . 

2. Suppose that K is now deleted (by another program). FIND S would return a NOT FOUND 
exception. FIND NEXT S would retrieve record Z. FIND PRIOR S would retrieve record A. 

3. Suppose that records B through Y are now added (by another program). FIND S would return a 
NOT FOUND exception as before. FIND NEXT S would retrieve Z ("skipping" L through Y). FIND 
PRIOR S would retrieve record Y (even though Y is later in the logical ordering than K was). 

NOTE 1: A LOCK/STORE in which the key is changed is considered as a DELETE followed by a 
CREATE/STORE as far as all paths are concerned, including the set paths of the 
program doing the LOCK/STORE. Thus, for example, the program doing the LOCK/STORE 
and changing the key will always get a NOT FOUND exception on "FIND S" afterwards. 
Also, "FIND NEXT S" and "FIND PRIOR S" will normally return different results than 
they would if the set path of the program doing the LOCK/STORE were to track the 
record when the key changed. This may be clarified by an example. Consider an index 
sequential set S with keys A, K and Z stored. If the program's path for S references 
K and the key K is changed to L, then FIND S gives NOT FOUND, FIND NEXT S gives L 
(the record just STORED), and FIND PRIOR S gives A. If, however, the key K were 
changed to J, FIND S would give NOT FOUND, FIND NEXT S would give Z, and FIND PRIOR S 
would give J (the record just STORED). 

NOTE 2: Ordered data sets will not be brought into full compliance prior to III.O for reasons 
of audit file compatibility. 

D2291 ACR - USE OF DESCRIPTION FILE 

A new node containing copies of structure properties has been added to the description file in 
order to reduce the time needed to compile the ACCESSROUTINES and RECOVERY and to perform 
various functions using it. 
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D2H38 ACR - BUFFER CORE IMPROVEMENT 



The allocation of buffers by the ACCESSROUTINES has been improved for III.O. The DASDL 
specification for buffers has remained essentially the same except for some extensions for read 
ahead (see ACR note D2t62); however, the ACCESSROUTINES now interprets it in a different 

manner . 

Pre-III.O Implementation: 

For each file in the data base, the ACCESSROUTINES calculated a parameter called "XTRA" from 
the specification, as follows: 

XTRA:=N+M*(number of users); 

where N and M were specified in DASDL as: 

D DATASET ( 

) BUFFERS=N+M PER USER; 

The XTRA parameter was adjusted when user programs would open and close the structure. (OPEN'S 
incremented XTRA; CLOSE'S decremented XTRA.) With respect to buffer allocation, the 
ACCESSROUTINES attempted to keep XTRA number of extra "not currently used" buffers in core. 
These extra buffers were in use at one time and were kept available in hopes that they would 
soon be reused. 

Examp I e : 

D DATASET ( 

) BUFFERS=1+1 PER USER; 

With one user of structure D, 3 buffers would be allocated (2 XTRA plus 1 in use). 

With 2 users of structure D, 5 buffers would be normally allocated (3 XTRA plus 1 in use for 
each user ) . 

III.O Implementation with READAHEAD off: 

On III.O, the concept of XTRA has been replaced by "DECLAREDBUFFERS" . When READAHEAD is FALSE, 
this parameter's calculation is identical to the former calculation of XTRA; however, the 
ACCESSROUTINES now attempt to keep at most DECLAREDBUFFERS in core. 

Example: 

D DATASET ( 

) BUFFERS' 1+1 PER USER; % READAHEAD = FALSE 

With one user of structure D, only 2 buffers (formerly 3) will be allocated. 

With 2 users of structure D, only 3 buffers (formerly 5) will be allocated. 

Following Is an example of II. 9 DASDL specification and III.O extended DASDL specification. 
Either specification has the same effect in a non-READAHEAD environment. 

I I . 9 Example 

BUFFERS=M+N PER USER 

III.O Examp le 

BUFFERS=M+N PER RANDOM USER . . . 

III.O Implementation with READAHEAD on: 

Consider the following buffer specification for READAHEAD: 

BUFFERS=M+N PER RANDOM USER 

OR P PER SERIAL USER . . . 

The DECLAREDBUFFERS parameter has the same semantics as above, but is calculated slightly 
differently, as follows: 

DECLAREDBUFFERS=M+N*(no. of random users) 
+P*(no. of serial users). 
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Clearly, the only difference in this case is that the "P" parameter is substituted for the "N" 
parameter for all serial users. 

Note: On both the pre— III.O and III.O implementations, the actual number of buffers to be 
allocated is not completely constrained by the user specification. One obvious case is 
a user specification of BUFFERS=0+0. (The ACCESSROUTINES must allocate at least 1 
buffer, or the program will not run.) Moreover, the ACCESSROUTINES may exceed the user 
specification in order to employ certain audit algorithms, table splitting, etc. 

The III.O implementation is a more reasonable approach to buffer management for the following 
reasons: 

1. The ACCESSROUTINES will more precisely allocate buffers according to what the user 
specified. This increases the user's control and predictability of buffer core. 

2. The former implementation used too many buffers for most applications, effectively 
decreasing total system throughput without increasing the performance of the data base. 
(The default buffer specification of 1+1 PER USER (without READAHEAD) is ample for most 
appl ications. ) 

3. The III.O algorithm keeps the amount of buffer core lower; hence, data base total core may 
be postponed from reaching ALLOWEDCORE. This is of tremendous benefit, since overlaying and 
thrashing occur when ALLOWEDCORE is exceeded. 

Note: Data bases that have been finely tuned under the old algorithm will use less core, but 
may sometimes do excessive I/O under the new algorithm. If so, the number of buffers 
per structure may have to be increased for some structures, especially index-sequential. 

D2462 ACR - READ AHEAD BUFFERING 

INTRODUCTION 

A user program can access a data base structure in one of two modes, as follows: 

1 . Random 

Successive data management operations access non-adjacent blocks of the structure from one 
call to the next. 

Example: 

FIND <struclure> AT . . . ; 

Repeated operations of this type against a RANDOM <structure> would normally yield random 
access . 

2 . Serial 

Successive data management operations access the same or "logically adjacent" blocks of the 
structure. Logically adjacent blocks are blocks which would be hit by repeated "FIND NEXT 
<structure>" selections one after the other. For certain structures, this implies that the 
blocks need not be physically adjacent (e.g., INDEX SEQUENTIAL). This type of access may 
occur on any of the following statements: 

A. FIND NEXT <structure>; 

B. FIND NEXT (structure) AT . . 

C. FIND FIRST (structure) AT . . .; 

D. FIND (structure) AT . . .; 

When a user program accesses a structure serially, it is possible for the ACCESSROUTINES to 
issue reads on blocks in advance. of when they are currently required. This process is known as 
"read ahead". The benefit of read ahead is a decrease in buffer wait times when blocks are 
actually required. This in turn causes a decrease in total elapsed time for serial accessing 
programs. 

Read ahead has been implemented for all types of physical structures (data sets and index sets) 
in the "next" direction only (not "prior"). The remainder of this document describes how this 
feature may be invoked. 

READ AHEAD CRITERIA 

Read ahead will be performed on a us e r / s t r u c t u r e basis when the following criteria are met: 

1. DASDL has been extended to allow the following: 

a. The read ahead option may be turned on or off for any physical structure. 

b. The number of buffers per read ahead use may be specified. 

The ACCESSROUTINES will only attempt read ahead for a user if the read ahead option has 
been turned on and the number of buffers per read ahead user is at least 2. 
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2. The user program must be accessing the structure (with read ahead enabled) in a serial 
manner. 

DASDL SPECIFICATIONS 

A new physcal attribute, "READAHEAD" , has been implemented for data sets and index sets and may 
not be specified for accesses. 

Syntax: 



READAHEAD 1 

I I 

|- = — TRUE —I 

I I 

I- FALSE -I 



READAHEAD is FALSE by default. 

The purpose of this attribute is to inform the ACCESSROUTINES whether or not to perform read 
ahead when a user program accesses the structure serially. 

Also, the BUFFERS clause has been extended. 

Syntax: 

— BUFFERS — = < I nt 1 > I 

I 



I I- + — <user>-| 

I I 

I -< i nl2> — PER USER —I 



< us e r > 

<int2>— PER RANDOM USER 



I 

I- OR <int3> PER SERIAL USER 



I -< i n t2> 

I 

I- PER USER 



This buffer syntax is compatible with the former syntax, and the parameters <intl> and <int2> 
have retained their original default values; however, the semantics have changed slightly. 

1 . < intl> 

This is the number of base buffers allocated for the structure. 

2. <Int2> 

The semantics is the same for all occurrences of <int2> in the syntax. This is the number 
of buffers allocated to each user accessing the structure randomly. If READAHEAD is set to 
FALSE, al I users are assumed to be random. 

3. <int3> 

This is the number of buffers allocated to each serial user of the structure. When 
READAHEAD is TRUE, the value of this parameter must be greater than or equal to 2; 
otherwise, a syntax error is generated. This restriction helps to ensure that the 
ACCESSROUTINES will have allocated sufficient buffers to handle serial users without 
thrashing. If READAHEAD is FALSE, this parameter is ignored. 

The default settings for these parameters are as follows: 

A. <int 1> - 1 

B. <inl2> - I 

C. <int3> - Maximum of 2 or <int2>+l 

To facilitate a II. 9 to III.O DASDL update, both the READAHEAD and BUFFERS clauses may be 
specified in the DEFAULTS clause for "global", data set or set defaults. 

HOST LANGUAGE STATEMENTS CAUSING READ AHEAD 
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If READAHEAD was specified in DASDL . the ACCESSROUTINE5 will perform read she 
applicable. No special host language command(s) is necessary to force the prog 
serial mode; however, read ahead may only occur on the following verbs: 

1. FIND 

2. LOCK(MODIFY) 

3. DELETE 
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ads where 
ram into a 



There are several variations of read ahead, depending on whether selections art 
data set or index set. 

Consider the following DASDL: 

DEFAULTS (READAHEAD=TRUE) ; 
D DATASET ( 



made via the 



) ; 
S SET OF D . . . ; 

Repeated execution of the following selections (shown with the "FIND" verb) may yield read 
ahead s for D or S: 

1. FIND NEXT D; 

Read aheads will be performed for D but not S. 

2. FIND KEY OF NEXT S; 

Read aheads will be performed for S but not D. 

3. FIND KEY OF S AT . . . ; 
FIND KEY OF FIRST S AT . . 
FIND KEY OF NEXT S AT . . .; 

If logically consecutive blocks of S are being hit by any of the above selections, read 
aheads will be performed for S. No read aheads will be performed for D. 

t. FIND NEXT S; 

Read aheads will be performed for both S and D. 

5. FIND S AT . . . ; 

FIND FIRST S AT . . .; 
FIND NEXT S AT . . .; 



If logically consecutive blocks of S are being hit by any 
aheads will be performed for S. The same is true for D. 



Note: If READAHEAD is off for a structure, read aheads will never be 
structure . 

ACCESSROUTINES READ AHEAD ALGORITHM 



of the above selections, read 
performed for that 



When a user program performs one of the data management operations shown above, the 
ACCESSROUTINES execute read ahead detection code. This code compares the block pointer of the 
previous access to the block pointer of the current access. If the two accesses occurred in 
the same or logically adjacent blocks, it is counted as a sequential access. After 3 such 
consecutive accesses, the program enters serial mode. This also causes the buffer pool to be 
adjusted according to the BUFFERS clause in DASDL. Once serial mode is entered, one read ahead 
is performed each time another block is accessed sequentially. If sequential access is 
discontinued, read aheads are no longer issued and random accesses are counted. If 6 
consecutive random accesses occur, the program will revert to a random state. The buffer pool 
will be readjusted and read aheads will no longer occur. If the program changes state more 
than once (random to serial, serial to random), the number of accesses needed to cause a state 
change will be raised to a higher value to make state changes much more difficult. This will 
prevent spurious read aheads and buffer allocations and deallocations. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 DMS 1 1 - ACCESSROUTINES 



MARK 3.0 
SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - ACCESSROUTINES 



PAGE 5H 



P1017 ACR - "ACCESSROUTINES" SEGMENTATION 

Some related procedures and blocks have been combined into the same code segment in order lo 
decrease the number of segment descriptors in the data base stack. 

PI 018 ACR - IMPROVE "I/O" ERROR DISPLAY 

The I/O error messages emitted by the ACCESSROUTINES have been improved. 

PI 019 ACR - ORDERED DATA SETS OUT OF SEQUENCE 

A problem which could result in the records of an ordered data set being out of sequence has 
been corrected. 

P1020 ACR - CONTROL FILE LOCKING 

The ACCESSROUTINES no longer access the control file without acquiring the appropriate lock(s). 
Formerly, I/O errors or reading invalid records from the control file may have occurred. 

PI 057 ACR - AUDITED BIT VECTOR "ZERO DISK ADDRESS" 

Insert after a generate null was causing a data base fatal "ZERO DISK ADDRESS" error. This has 
been corrected. 

PI 058 ACR - "SEG ARRAY" FAULT WHEN CREATING PARTITIONS 

It was possible to get a SEG ARRAY fault when creating partitions with large titles (an 
internal array was too small). This problem has been corrected. 

PI 071 ACR - "DMSCLOSEERROR 2" AT END OF HALT/LOAD RECOVERY 

If a global data population Item were specified for the restart data set, it was impossible to 
niiS£, e ^,^,UXr, ° om P lele Halt/Load recovery. Instead, an INVALID INDEX occurred, followed by 
DMSCLOSEERROR 2. This has been corrected. 

PI 153 ACR - STORAGE CLOSE IN UNAUDITED DATA BASES 

If an unaudited data base has been updated, but the last user program to close the data base is 
not an updater (e.g. OPEN INQUIRY), the procedure which writes the storage variables back to 
the file (5T0RAGE0PENECL0SE) is not called. This error could have serious consequences; it has 
been corrected. This problem did not exist prior to II. 9, nor does it exist for audited data 
bases. 

PI 199 ACR - MARK STACK "DS" IF ABORT DIES 

Under sue conditions, abort recovery would fail, but the stack which initiated it would not be 
marked as DS ' e d . This has been corrected. 

P1200 ACR - "SEG ARRAY" IF PACK AUDIT 

The ACCESSROUTINES would get a SEG ARRAY error at 1027^000 if auditing to system resource pack 
and copy to tape or verify were specified. This no longer occurs. 

P127H- ACR - MISSING "HANDLEWRITEERROR" CALL 

Under certain conditions, write errors would not be noticed by the ACCESSROUTINES; therefore, 
the row might not be locked out, and the BLKIMG audit record would not be produced. This 
problem has been corrected. 

P1342 ACR - INNOCENT PROGRAMS HANG ON DISEASED "DBS" 

It is now less likely that programs will hang on a data base that is hung but which they are 
n? 1 using. (This could happen at EOT when DMSFREE is called to free all the records of this 
stack in all currently open data bases.) 

P134t ACR - "SET ROWLOCK" READ, WRITE ERRORS 

The ACCESSROUTINES were not setting the ROWLOCK field to 2 if a read error were encountered on 
the row. For unaudited data bases, the ACCESSROUTINES were not setting the ROWLOCK field lo 1 
if a write error were encountered on the row. 

P1345 ACR - RETRY DISK READ ON CHECKSUM ERROR 

The ACCESSROUTINES will now reread the disk block if a checksum error is encountered but no 
read error is reported by the MCP . They will repeat this several times, if necessary, before 
giving up and reporting an I/O error. 
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PI 346 ACR - ABORT DUE TO "BAD DIVEST" 



Space allocation for ORDERED DATA SETS, under a certain condition, could cause the data base to 
become DSed by a BAD DIVEST. This has been corrected. 

PI 400 ACR - FALSE ERROREXIT "9" IN "DIVEST" UNDER "DEBUG" 

If the compile -time option DEBUG (which is used for internal debugging purposes) were set when 
compiling the ACCESSROUTINES, it was possible to get an erroneous errorexit 9 (DIVEST ERROR) if 
multiprocessing and overlay were occurring. This has been corrected. 

PI 469 ACR - ALL ZERO BLOCKS/RECORDS 

When ALLOWEDCORE is set low enough, OVERLAY will deallocate buffers. There was a timing 
problem, such that an overlaid buffer could be written as all zeroes. This problem has been 
corrected. 

P1471 ACR - ATTRIBUTE ERRORS ON CONTROL FILE 

I f a DM OPEN ERROR exception occurred when two or more programs opened a data base 
simultaneously, file attribute errors could have been generated causing an error condition in 
the control file module. This has been corrected. 

PI 521 ACR - RECOVERY OF PARTITIONED STRUCTURES 

Several problems involved with aborted recovery of partitioned structures have been corrected. 
These problems were associated with the following: 

1. Backoul of original partition file creation. 

2. Recreation of partition file. 

3. An abort which left the end of file for a partition at the end of its last row. 

4. A second abort of partition changes immediately after a prior abort on the same partition. 

PI 532 ACR - "UNIDENTIFIED MISCELLANEOUS ERROR" RECOVERY 

The system no longer gets at "UNIDENTIFIED MISCELLANEOUS ERROR" in RECOVERY at 50329820 due to 
an unexpected restart type o f 3 o r 4 i n a last good restart area audit record. When last good 
restart areas are stored by CLOSE in the case of abnormal program termination, the STORE is 
coordinated with any ABORT recovery that may be happening concurrently. Duplicate restart 
areas are no longer stored in the case that a Halt/Load or abort recovery happened soon after 
storing such a restart area. 

PI 533 ACR - "ZERO FIND ADDRESS" AFTER "INSERT" 

The ACCESSROUTINES no longer terminate with "ZERO FIND ADDRESS" when INSERT <set> is followed 
by FIND NEXT <set>. 

PI 587 ACR - SERIAL ACCESS OF INVALID STATE RECORDS 

There are three stales for standard variable format records: normal, deleted and invalid. The 
invalid state exists only after a CREATE-STORE has failed to store a record after having 
allocated a new record slot. If serial access (e.g., FIND NEXT D) encounters that slot, it 
fails to compute its length properly and probably faults. Deleted records do not cause this 
problem. 

P1594 ACR - DEADLOCK DURING ON-LINE RECONSTRUCT 

It was possible for a deadlock to occur during on-line reconstruction if any user programs 
locked records while in transaction state. This has been corrected. 

P1613 ACR - FIX AUDIT LASTRECORD; ZIP "C0PYAUD1T" 

If both update and inquiry programs had the data base open and the last program to close the 
data base were an inquiry program, the audit file would be incorrectly terminated with SDSEOF 
records and the last record attribute was incorrect. These problems have been corrected. 

When the ACCESSROUTINES decline to extend an existing disk or pack audit file, COPYAUDIT is 
zipped for it, if appropriate. 

P1616 ACR - ERROR IN "SET TO ENDING" ORDERED DATA SETS 

A problem has been corrected in which the ACCESSROUTINES would not find "PRIOR" after a "SET TO 
ENDING" against an ordered data set when records were present. 
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PI 678 ACR - ERRORS IN RECOVERY CLOSE 

The ACCESSROUTINES will now terminate if an error is detected when RECOVERY closes the data 
base. Formerly, errors were ignored and unpredictable results could occur. 

It should be noted that since the errors were not handled in close RECOVERY, a subsequent ABORT 
could hang the data base. 

PI 679 ACR - DEADLOCK RECONSTRUCTION VS. SYNCPOINT 

A timing window has been closed in which reconstruct would hang if the final "stop phase" of 
the data base occurred during the middle of a syncpoint. 

PI680 ACR - RESULT ON "SELECT" REJECT 

The ACCESSROUTINES no longer fail to generate a proper DMSTATUS result for INQUIRY when a 
record does not pass the logical data base SELECT condition. 

P1681 ACR - EMBEDDED DATA SET PATHS NOT INITIALIZED 

When a FIND or LOCK was executed on the workarea of the master, the current structures of 
embedded data sets below it were not initialized to "BEGINNING". A possible consequence was 
that a subsequent "DELETE <embedded data set name>" would typically get a fatal data base 
err0 L^, k S , k U ,?^ aS " MISSING ENTRY FR °M AUTO SET/SUBSET". Now, embedded structures are always set 
to btG INNING" when a LOCK or FIND is done on a master (even if the same master is found). 

P1682 ACR - INSERT/REMOVE RESET BITVECTOR 

nr£Iu£ R0UTINE - S P alch 29.77 caused bilvectors to be reset to the beginning when an INSERT or 
REMOVE was done on them. This has been corrected. 

P1683 ACR - ATTRIBUTE ERROR "RSFILE . IOCLOCKS" 

If statistics were set and the last program to close the data base was an inquiry program after 
£H£„„£~„ more "Pdate programs previously closed the data base, a harmless attribute error at 
92089020 in the ACCESSROUTINES occurred, because RSFILES was erroneously closed by the last 
updater. Also, unpredictable actions could occur, because two processes were using a FIB 
without the protection of a lock. The errors no longer occur. 

P168 l t ACR - HALT LOAD RECOVERY USES WRONG AUDIT FILE 

If on-line data recovery was running, it would reset the audit file number in the control file 
every time it created a restart point and when it finished. It would reset it to the audit 
file current when it was initiated. Normally, the ACCESSROUTINES would correct it at the next 
audit flle switch or when the last update closed the data base; however, if a halt/load 
occurred before it was corrected, RECOVERY would use the wrong audit file and corrupt the data 
base as well as destroy the continuity of the audit. The error has been corrected. 

P8946 ACR - INTERLOCK OF ABORT AND RECONSTRUCTION 

If reconstruction tried to slop the data base while abort was releasing the data base, abort 
could cause the data base to be released while reconstruction thought it was successfully 
stopping it. This synchronization problem has been corrected. 

P9013 ACR - RETURN CORRECT STRUCTURE NUMBER 

The ACCESSROUTINES now returns the correct structure number on an exception for remaps. 

P9018 ACR - "I/O" ERRORS ON OPEN 

A fatal error will now result if an I/O error occurs while trying to open a data base file; 
previously, the program would try to proceed and cause other strange errors. 

P9020 ACR - "INVALID INDEX," VARIABLE FORMAT 

If the creation of a variable format record failed (e.g., due to duplicates exception), it was 
£r?n^i e for a subse 3"ent FIND NEXT operation on the data set to fail with INVALID INDEX in the 
bLIDATA procedure. This has been corrected. 

P9073 ACR - DELETE EMBEDDED DATASET ERROR 

Depending on the particular DASDL , it was possible to get an error when deleting master records 
which formerly contained detail records in an unordered data set. This has been corrected. 

P9084- ACR - INVALID "DATAERROR H" 

An invalid DATAERROR 4 n o I ong e r occurs when attempting to store a variable format record. 
Formerly, the ACCESSROUTINES would emit this error if the CREATE were performed with a 

n<,r ?2''f e n,T^Lnn ,*; h e record l V P e <«-9-. CREATE D (R);, where R is a normalized real would 
yield at DATAERROR 4- at store time). 
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P9094 ACR - FAIL WHEN PRINT STATISTICS 

If the restart data set were never invoked and opened, the ACCESSROUTINES would fa i I •>>•" the 
statistics were printed. DMCLOSEERROR #2 would result, and sometimes a dump by FORGETCHECK 
also. The problem has been corrected. 

P9096 ACR - INCORRECT RESTART RECORD 

It was possible for the wrong restart record to be stored in the restart data set if a program 
r abnormally terminated' outside of transaction state after another program had "«•«■■" 
abort. In this case, the saved restart area was from before the abort, not after. Th , s has 
been corrected. 
P9177 ACR - INITIALIZATION OF VARIABLE-FORMAT PARTITIONS 

If a partition of a standard variable format data set were initialized after using ^ n °^^ 
oartition, it was possible for the new partition to "inher.t" the available address able 
(DKTABLE) from the previous partition. This could cause s e r i o us er r or s ,n the new partition, 
including corrupted data and fatal data base errors. This has been corrected. 

P9178 ACR - STANDARD VARIABLE FORMAT AVAILABLE TABLES 

The ACCESSROUTINES no longer lose available space tables for standard variable format d ^a 

ets Formerly, these tables were never written beyond the original da a area, and hus were 

om iete rg tten. Now, available space tables are written past the data area ,f there are 

no empty blocks in the data area. (Data is still never written past the data area). 

P91B1 ACR - CORRECT ORDERED SET PATHS 
User paths were not adjusted properly when ABORT backed out a create of the last record in an 
ordered data set block. This has been corrected. 

P9185 ACR - ELIMINATION OF HOLES IN RESTART DATA SET 

The ACCESSROUTINES no longer use records in the restart data set as temporary storage for last 
innd restart areas This results In less processor and I/O overhead, eliminates a potent.al 
Source o??atal I/O errors in RECOVERY, simplifies the DMSI I software, and can result ,n 
slightly less data being written to the audit trail. 

It is very likely that rebuild would fail at sequence number 60933000 in RECOVERY. This has 
been corrected. 
P9251 ACR - TOO MANY TABLE LEVELS CAUSE "INVALID OP" 

The ACCESSROUTINES no longer cause an INVALID OP when attempting to allocate more levels of 
Index requesting tables' than the software can handle This condition is now detected, an 
appropriate message is displayed, and the data base is Ub ed. 

P9256 ACR - CORRECT PATH FOR DISJOINT ORDERED DATA SETS 

If an ordered data set path or ordered access path had extended be y ond t h e I as t record in the 
Sata set an abort occurred. A FIND NEXT after the abort could have found a record instead of 
getting a NOT FOUND. This has been corrected. 

P9257 ACR - DATA CORRUPTION IN ROOT WORD 

A root word is a link to the root of an embedded structure which resides in a master record of 
th ex hghr structure. For several types of embedded structures ( , n e x s e q u e t , a I 
unordered data sets, etc.), bits 19:20 of the root word should be zero, unless all bits of the 
root word are ones. 



Violation of this condition (which are instances of data corruption) are now detected, a 
message is displayed" and these bits are zeroed so that the data base can keep running. 

If the user program which detects a violation has the data base open u p d a t e , t he ro< >t word will 
. ;o be corrected on disk in the data base and an appropriate message d.splayed. The user 

Id ak o? these messages, because if a root word i s corr u p le d , he re ma y ver y we 
other corrupted data in the data base. The sooner corrective action ,s taken, the eas.er ,t 
will be to correct the situation. 

P92B0 ACR - ACCELERATE NOT FOUND LINEAR SEARCH 

Linear search for index sequential and ordered list ,1 I I no- return a NOT FOUND without going 
to the end of the file if the high order portion of the key has been specified. 

P92B1 ACR - FIND NEXT DIRECT AT KEY > VALUE FAILS 

^ue lh x/ U "FU ^VYVkEYNAMe' *>V .out 5* re'turVa^TFOUND^c'ep I i on ins^ .7'JLd^ 
record X+l. This problem has been corrected. 

Other errors have also been corrected for FIND's via a direct access, including selection 
expressions involving zero. 
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P926t ACR - ELIMINATE "MASKSEARCH" IN "FIND KEY" 

"FIND KEY OF" has been made more efficient by eliminating a MASKSEARCH. 
P9280 ACR - PARTITIONED INDEX SETS 

thJ S v.l^'T r C L SS8ry f""- the system to "extract" a key value from a data record and use 
that value to look up an entry in an index set; e.g., DELETE FIRST <data ,t ! , USe 
one or more sets for that <dala set>. If any such set nappe s to b. a? m ed S i this 
DELFTF I'h U5e • m* 1 Sel f °r thIs P artItI °" »asl.r, the par t I t i on code I ?er" feres w th the 
a'fala! d'a J. * ... e %r r or . ° * ' ^ " ^ ,rP ° r ' ' " e ,u d ' "° l fi " dI "9 the ° nt ^ >" " « . 1 1 ! / | ch 'il 

P9281 ACR - ORDERED ACCESS PATH 

1. A FIND NEXT on an empty data set now sets the path to ENDING instead of BEGINNING. 

'• BEGINNIn| XT AT KEY > VALUE ' WhiCh 98tS a N0TF °UND, now sets the path to ENDING instead of 

P9283 ACR - WARNINGS SUPPRESSED 

Warnings of empty node lists are no longer generated for data sets or r.ma„ c ., h ■ k 

record type declared but no variable format parts. apS Wh '° h have a 

P92B4 ACR - COMPILE-TIME PRINTING 
Redundant information about remaps is no longer printed when the ACRINFO option is set. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 DMS 1 1 - ACCESSROUT JNES 



PAGE 59 



MARK 3.0 
DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - BDMSALGOL 



DEH88 BDMSALGOL - "OPEN TEMPORARY" AND "CLOSE LOCK" 

It is now considered an error to open a data base with the TEMPORARY option and to close a data 
base with a LOCK option. 

The compiler will flag as errors all data base OPEN statements that specify the TEMPORARY 
option and all data base CLOSE statements that specify the LOCK option. 

Programs that had specified either an OPEN TEMPORARY or a CLOSE LOCK and "ere compiled with 
II. 9 or earlier compilers will not be allowed to run on III.O ACCESSROUT INES . A run-time error 
will occur in this case. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMSALGOL 

P1280 BDMSALGOL - BINDING "DMSII" ACCESSES 

::.i: "•:: iv:'.v.:.',\i'.:: ;.!:;:.!:■:, 2i;! 1 '?:J:::: 4 j:„ , ::: , :;..K::'""" - '"'•'■■"■■ ••■ 

P1486 BDMSALGOL - ALLOW "-" IN DATA BASE IDENTIFIER 

'-": h u^: m jrn r n :n,roir^:i,r!he b ^: e n ::M^r y data >»• <■.--.*..,. ,.„ t .,„. d . hyphen 

Example: 

DATABASE TESTDB-L1; 
DATABASE LDB-NAME OF DB; 

Hyphens are now recognized correctly in data base identifiers. 
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DOCUMENT CHANGES NOTES (0 NOTES) 
DMS II - BDMSCOBOL 



DaH88 BDMSCOBOL - "OPEN TEMPORARY" AND "CLOSE LOCK" 

II is now considered an error lo open a data base with the TEMPORARY option and to close a data 
base with a LOCK option. 

The compiler will flag as errors all data base OPEN statements that specify the TEMPORARY 
option and all data base CLOSE statements that specify the LOCK option. 

Pronrams that had specified either an OPEN TEMPORARY or a CLOSE LOCK and were compiled with 
Il!8 or earlier compters wiM not be allowed to run on III .0 ACCESSROUTINES . A run-time error 
will occur in this case. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMSCOBOL 

P1283 BDMSCOBOL - COMPARES INVOLVING DATA SET NAMES 

Alphanumeric compares Involving data set names are now allowed. Previouslv an Inoor,..,; 
message was produced for a valid comparison. iowbo. rrev.ously, an incorrect error 

P1284 BDMSCOBOL - DATA BASE SECTION SYNTAX 

lasVse'cHo'n. 15 "° '° n9er dT ^ont I nued while attempting to compile invalid syntax in the data 
PI 4 12 BDMSCOBOL - GLOBAL DATA BASES 

l^zKin s. o :,::!sr t Ji. h, -!i: b ;i.2'i: ir^i\ e ^iu< ai > b - to b « — < » • >— 

P9110 BDMSCOBOL - "XREF" "DM" KEYS IN "SELECTION" EXPRESSIONS 
The COBOL compiler no longer fails to XREF DM keys in SELECTION expressions. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - BDMS/PL/I 



D2488 BDMSPLI - "OPEN TEMPORARY" AND "CLOSE LOCK" 

It is now considered an error to open a data base with the TEMPORARY option and to close a data 
base with a LOCK option. 

The compiler will flag as errors all data base OPEN statements that specify the TEMPORARY 
option and all data base CLOSE statements that specify the LOCK option. 

Programs that had specified either an OPEN TEMPORARY or a CLOSE LOCK and were compiled with 
II. 9 or earlier compilers will not be allowed lo run on 1II.0 ACCESSROUT INES . A run-time error 
will occur in this case. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMS/PL/I 

PI 120 BDMSPLI - REUSE SCRATCH STACK AREAS IN KEY COMPARES 

Under certain c I r c urns I a n c e s , the scratch string stack or scratch word slack was not being cut 
back dur.ng the key compare procedure for FIND statements. This would cause the string stack 
or word stack to grow unnecessarily, sometimes causing an INVALID INDEX or SEG ARRAY error to 

The string stack or word slack are now reused when possible during a key compare procedure. 
PI 280 BDMSPLI - BINDING "DMS II" ACCESSES 

iLil J°" P° ss!ble l ° bind a data base that declares an access. Previously, no information was 
saved for an access; thus, incorrect binding information was created. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BUILD INQUIRY 

P1201 BUILDINQ - "INVALID INDEX" 

An incorrect lest failed to resize an array when necessary, which subsequently caused an 
INVALID INDEX. This has been corrected. 

P1202 BUILDINQ - MISSING SETS 

If an INQUIRY program were generated for a logical data base or selected data sets, it was 
possible to accidentally exclude some sets. This could result in faults or less than optimum 
search algorithms. This has been corrected. 

P1535 BUILDINQ - "BUILDINQ" FAILS WITH LOGICAL DATA BASE 

BUILDINQ could fail for the following situation: A logical data base contains a remap, which 
has a set with data in key. The nature of the error was unpredictable, but was not l.kely to 
allow the BUILDINQ program to finish. 

P1595 BUILDINQ - LOOPING 

BUILDINQ could loop when generating an inquiry program for a logical data base. This has been 
corrected. 

P1B85 BUILDINQ - BUILDING STRUCTURES NOT IN LOGICAL DATA BASE 

BUILDINQ will now generate only global items and will drop data sets if global data is included 
in a logical data base. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BUILDREORGANIZATION 

P153H BUILDREORG - "INVALID INDEX" WITH TOO MANY STRUCTURES 
BUILDREORG no longer terminates with an INVALID INDEX when the structure numbers exceed 250. 
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DMS II 



COPY AUDIT 



PI 586 COPYAUD-II - COPY PRIMARY AUDIT ON TAPE 



COPYAUDIT wou I d not copy 
used, because of setting 



a primary audit if 
the attributes for 



it was on tape unless the OVERRIDE option were 
NEXTTAPE improperly. This has been corrected. 
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DMS II - DASDL 



D2411 DASDL - NEW DOLLAR OPTIONS 



Several new dollar options have been implemented to more exactly control some of the output to 
the compiler file LINE. The output affected is that produced by the TEST and STORE options 
Ihese options will continue to function as they have in the past, but they may be de i mp I erne n I e d 
onafuturerelease. 

The new options are: TEXT, FILE, LAYOUT, DECKLIST, STRUCTURE. 

4rrrcc££, U ,??Mr£ r i n t in9 ° f the DA .SDL-g e n e r a t e d source statements used in the 
ALLLbbKUUTINEb (also produced by TEST). 

Will cause printing of storage requirements and file size information (also 
produced by STORE) . 



TEXT: 

FILE: 

LAYOUT: 

DECKLIST: 

STRUCTURE: 



Will cause printing of item and key item offsets and sizes (also produced by TEST 
or STORE) . 

Will cause printing of the deck which can be zipped to compile the database 
software: ACCESSROUTINES , RECOVERY, etc., (also produced by TEST). 

Will cause printing of a new listing of the structures showing hierarchies via 
indentation and collecting data sets, set, access and remaps together according to 

Iheir associations. 



One other option, ALLINFO, 



ono A, P > l ik irA ALLINF0 - Is simply a shorthand for all five of the above options. SET, RESET 
POP on ALLINFO is exactly the same action as on each of the above individually. 



The following example shows DASDL input. 

$SET ALLINFO 
D-I DATA SET 
( 

Nl NUMBER(IO) ; 
N2 NUMBER(IO) ; 
E-l DATA SET 
( 

Ml NUMBER(IO) ; 
ME NUMBER (10) ; 
) ; 
SE-1 SET OF E-l KEY Ml ; 
RE-1 REMAPS E-l 



) 



( 



) ; 



Ml ; 
MP; 



R-l REMAPS D-l 
( 
Nl; 
N2; 
RE-1 ; 
) ; 
D-2 DATA SET 



( 



) ; 



XI ALPHA! 10) ; 
X2 ALPHA! 15) ; 



The following shows the output produced by the DASDL input example. 



THE FOLLOWING SECTION IS PRODUCED BY TEXT (OR TEST) OPTION 



D-l (2) 

VALIDRECORD *» (HB4[0l NEQ MAXA FOR 10 OR HBttlOl NEQ MAXA FOR 10)# 

VERIFYSTORE ** ((UWttOl NEQ MAXA FOR 10 OR UWttlO] NEQ MAXA FOR 10) )# 

INVALID »* REPLACE HBOC J BY DEFAULTNULL FOR 3 WORDS ;# 

CLEARDATA ** REPLACE HBOC 01 BY DEFAULTNULL FOR 3 WORDS ;# 

DMSTOUSER »» REPLACE UW8 BY HB8 FOR 10; # 
USERTODMS *« REPLACE HB8 BY UW8 FOR 10 ;» 

USERTODMS «» REPLACE HB8 BY UW8 FOR 10;# 
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VALIDRECORD 


* # 


CHB8 NEQ MAXA FOR 10 OR HB8C10] NEQ MAXA FOR 15) # 


VERIFYSTORE 


# # 


C(UW8 NEQ MAXA FOR 10 OR UW8C10] NEQ MAXA FOR 15) )# 


INVALID 


* # 


REPLACE HBOtOl BY DEFAULTNULL FOR 5 WORDS;* 


CLEARDATA 


* # 


REPLACE HBOtOl BY DEFAULTNULL FOR 5 WORDS ;# 


DMSTOUSER 


* * 


REPLACE UW8 BY HB8 FOR 25 ; # 


USERTODMS 


* * 


REPLACE HB8 BY UW8 FOR 25 ;# 


USERTODMS 


* * 


REPLACE HB8 BY UW8 FOR 25 ;# 



<page e j e c I > 



THE FOLLOWING SECTION IS PRODUCED BY FILE (OR STORE) OPTION 



FILE 



'"'D-l' 



'/DATA. 



BLOCKSIZE 
RECORDS I ZE 
AREAS I ZE 
AREAS 

POPULATION 
ON DISK 
BLOCKSIZE 
AREASIZE 
MAX SPACE 



140 (RECORDS) 

3 (WORDS) 

7840 (RECORDS) 

2 (ROWS) 

10000 (RECORDS) 

420 (WORDS) 

784 (SEGMENTS) 

1568 (SEGMENTS) 



FILE 



'D-l' 



TABLESIZE 
AREASIZE 
AREAS 

POPULATION 
LOADFACTOR 
ON DISK 
BLOCKSIZE 
AREASIZE 
MAX SPACE 



'E-l / SE-1 ' " 

28 (KEY ENTRIES) 
390 (TABLES) 
26 (ROWS) 
10 (MEMBERS) 
66* 

56 (WORDS) 
780 (SEGMENTS) 
20280 (SEGMENTS) 



TOTAL STORAGE REQUIREMENTS FOR DATA BASE; 



35288 SEGMENTS ON HPT DISK 
SEGMENTS ON DISK PACK 
SEGMENTS ON DISK PACK 



<page ejecl> 



THE FOLLOWING SECTION IS PRODUCED BY LAYOUT (OR TEST OR STORE) OPTION 



RECORD LAYOUT INFORMATION 

RECORD AND KEY AREA OFFSETS ARE GIVEN AS DIGITS = (WORD, DIGIT) 

(4 BIT DIGITS) . 

SIZES ARE GIVEN IN DIGITS. 

NUMBERS AT THE LEFT INDICATE IN WHICH VARIABLE FORMAT PART THE 

ITEM IS FOUND. 

FOR SETS. "*" AT THE LEFT INDICATES THAT THE ITEM IS KEY DATA. 



STRUCTURE 2; D-l, DATA SET 

(RECORD TYPE) ITEM NAME 

Nl 

N2 

E-l 

SE-1 

RE-1 



OFFSET 



SIZE 



= 


0, 0) 


10 


10 = 


0,10) 


10 


= 


0, 0) 


12 


24 = 


2, 0) 


12 


= 


0, 0) 


12 
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STRUCTURE 6: R-l , REMAP 

(RECORD TYPE) ITEM NAME 

Nl 
N2 
RE-1 

<page eject> 



OFFSET SIZE 

= ( 0, 0) 10 

10 = ( 0,10) 10 

= ( 0, 0) 12 



THE FOLLOWING SECTION IS PRODUCED BY STRUCTURE OPTION 



DATA SET: D-l (2) 

REMAPS: R-l (B) 



DATA SET: E-l (3) 

REMAPS: RE-1 (5) 
SETS: SE-1 (H) 



DATA SET: D-2 (7) 



<page eject> 



THE FOLLOWING SECTION IS PRODUCED BY DECKLIST (OR TEST) OPTION 



? JOB "CODE"; 
CLASS = HO ; 
BEGIN 

COMPILE ACCESSROUTINES/-CODE" WITH DMALGOL LIBRARY: 
COMPILER FILE TAPE = DATABASE/SYMBOLIC, 

RECOVERYSYM = DATABASE/RECOVERYSYMBOLIC, 
DASDL = DESCRIPTION/ "CODE", 
PROPERTIES = DATABASE/PROPERTIES; 
DATA CARD 
$ MERGE LINE INFO 
$ SET ACRDISPLAY 

? COMPILE UTILITY/ "CODE" WITH DMALGOL LIBRARY; 
OPTION = FAULT ARRAYS CODE BASE FILES DBS; 
COMPILER FILE TAPE = DATABASE/UTILITY, 
DASDL = DESCRIPTION/ "CODE", 
PROPERTIES = DATABASE/PROPERTIES; 
DATA CARD 
$ MERGE LINE INFO 
? END JOB. 

D2437 DASDL - "REORGANIZE GLOBAL DATA" EXTENDED 

The syntax for the reorganization specifications for global data has been extended, 
s y n I ax i s as f o I I ows : 



The 



REORGANIZE GLOBAL DATA 



( — ITEMS 



SAME — 
CHANGED 



If neither ITEMS SAME nor ITEMS CHANGED is specified, it will be as if ITEMS CHANGED were 
specified. This action is compatible with previous releases, where no other option was 
available. 
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DS4-60 DASDL - MAINTAIN "UPDATE" LEVEL 

The description file UPDATE level number will no longer be unconditionally increased on every 
DASDL UPDATE run. In particular, when the level number is not increased, it will facilitate 
crossing software release levels. 

The level will now only be increased if certain "significant" changes occur. Such changes 
include adding and deleting structures, any reorganization, and replacing filler with data. 
When the level is increased, a new control file must be made and all tailored software 
(ACCESSROUTINES, RECOVERY, Data Recovery, UTILITY, Saved Reorganization Programs) must be 
recompiled. When the level is maintained, only those items affected need be remade. DASDL 
will report which items are affected. At such a time, more than one set of ACCESSROUTINES will 
be able to run and the user will be responsible for ensuring that the desired set is loaded 
under the proper name on the correct family, etc. 

D24B1 DASDL - USER DEFINED DOLLAR OPTIONS 

User defined dollar options have been implemented. They are defined by their first appearance 
on a dollar card; by default, the value is FALSE . They are "declared" implicitly. Both 
standard and user options may be assigned values determined from Boolean expressions composed 
of options. 

<option assignment> 

--<option name>-- = — < e xpr e s s i on >-- I 



<expression> 
| < 



I 
NOT -I 

I 



AND 

I 

l<- OR - 

I 

|<- IMP -I 

I 

l<- EQV -I 

-<option n ame > 

- TRUE 

- FALSE 

- ( — < expression >- 



| 



Note: The operators are listed in the above diagram in order of precedence. 

The "= <expression>" syntax is valid only when the dollar card action is SET. User option 
identifiers may be up to 17 alphanumeric characters; hyphens are not permitted. Incorrect 
dollar card syntax will now produce syntax error messages from the compiler. 



D2534 DASDL - "UPDATE" AND "INITIALIZE" 

DASDL now ensures that INITIALIZE is not specified 
inadvertent reinitialization of the data base. 



during DASDL update. . This prevents 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - DASDL 



P1028 DASDL - "DASDL" UPDATE TIMESTAMP 

The process of performing DASDL UPDATE ' s is intended to be linear-. A new set of checks has 
been implemented to prevent "branching". The current (II. 9) implementation requires that 
programs, a c c es s r o u t i n e s and control files match on the basis of the data base timestamp and 
update level. Since the update level is simply a counter, it was possible to create two 
different descriptions which had the same timestamps and update levels. 

An update timestamp has been added to the description file and passed along to code files and 
control files which will tie all of them together more tightly. There will be a new value of 
the timestamp for each update level, and any checks currently made on the update level will be 
accompanied by a check on the update timestamp to make sure that it corresponds exactly. 

The proper t y I e ve I , siblevel and acrlevel values have all been increased in order to be able to 
detect which files have the new timestamps and which files do not. 

DMSOPEN will handle the SIB format level 6 which contains a DASDL UPDATE level timestamp. This 
timestamp is passed to the ACCESSROUT INES and compared to a value in tables which have been 
compiled into the ACCESSROUT I NES . 

P1059 DASDL - "PART I TIONINFO" IN COMPILE ORDER LIST 

The PARTITIONINFO data set is now put into the compile order list after global data. This 
prevents a possible syntax error when compiling the ACCESSROUT I NES . 

PI 060 DASDL - GLOBAL DATA "CHECKSUM" 

Specification of the CHECKSUM option is now effective. If UPDATE errors occur in DASDL because 
of this change, corrective action would be to remove the specification or to specify REORGANIZE 
GLOBAL DATA to add the checksum. 

P1203 DASDL - GROUP KEYS AND "REORGANIZE" 

It is no longer permitted to rearrange the items of a group which is a key when 
"REORGANIZEt ITEMS CHANGED)" Is specified. Such an action would invalidate existing set entries 
andprogramsusingit.evenwithremaps. 

P120H DASDL - "UPDATE" CHANGE OF DATA SET SUBTYPE 

The compiler no longer permits the change of data set subtypes (UNORDERED, DIRECT, etc.) when 
doing an UPDATE compile. 

P1205 DASDL - ERROR RECOVERY IMPROVEMENT 

The handling of certain instances of incorrect syntax input has been improved. In particular, 
faults no longer occur in some cases where an identifier was expected but the check for the 
identifier was incorrect. 

P1206 DASDL - COMPILER FAULT 

An INVALID OP fault no longer occurs when designated serial number specifications are made for 
the audit trail. 

P1207 DASDL - MACHINE "ID" IN HEADING 

DASDL will now use the TIME(23) intrinsic to print the machine identification on the heading of 
the line printer listing. Previously, B6700 was printed unconditionally. 

P1208 DASDL - DELETE VARYING ITEMS 

Checking of variation options (STORED, OCCURS, SIZE) on a DASDL UPDATE compile has been 
corrected to permit items which use the options to be deleted from a data set record. 

P1275 DASDL - IMPROPER INVALID TEXT 

For required alpha items with a null value of "HIGH-VALUE", the INVALIDTEXT was generated 

improperly. SEG ARRAY faults would occur during record deletions. The nature of the error was 

not such that data corruption or record recognition problems would occur. This problem has 
been corrected. 

P1H46 DASDL - NUMERIC ITEM SIZE OF ZERO 

A syntax error is now given if a numeric item is declared with a size of zero. 
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PI 447 DASDL - DELETING MANY STRUCTURES 



DASDL no longer terminates with the message "DESCRIPTION TABLE SIZE EXCEEDED" when several 
hundred structures are deleted. 

PI 472 DASDL - LABEL SOURCE INPUT CORRECTLY 

Following an INCLUDE, all source was labeled with a "D" rather than a "C". This problem has 
been corrected. 

P1473 DASDL - "NEWTAPE" FILE IN ERROR 

When the LISTP and NEW options are set and a syntax error is detected, the line containing the 
error will no longer be placed in the NEWTAPE file twice. 

PI 474 DASDL - "UNIQUE" COMPILES CORRECTLY 

DASDL no longer produces a spurious syntax error when a data item includes the "UNIQUE" option. 

PI 586 DASDL - "INCLUDE" DOLLAR OPTION 

DASDL now issues an appropriate error message if the title of the included file is not enclosed 
in quotes. The selection mechanism has also been corrected so that any portion of a file may 
be included. 

PI 527 DASDL - DEFAULT INITIAL VALUE 

DASDL will now correctly initialize Boolean, numeric and real items to the value specified in 
the item default statement. 

P1528 DASDL - " INITI ALVALUE" IN "DEFAULT" STATEMENT 

When an INITIALVALUE was specified in a DEFAULT statement, an invalid initial value was 
assigned to some items. This problem has been corrected. 

PI 529 DASDL - PROPERTY BUFFER DECLARATION 

The size of the data base properties buffer has been increased by one word to prevent spurious 
SEG ARRAY errors. 

P1530 DASDL - BUILD "CONTROLITEMNODE" CORRECTLY 

If a data base contained variable format records, the CONTROLITEMNODE in the data base 
description file was not constructed properly. This could result in a VERSIONERROR when a link 
item was referenced at run time. This problem has been corrected. 

PI 584 DASDL - SPURIOUS ERROR DURING "DASDL" UPDATE 

If a data set containing a GROUP item was reorganized using the ITEMS CHANGED option, a 
spurious update error could be reported. This has been corrected. 

P1588 DASDL - PREVENT LOOP ON DOLLAR CARD 

DASDL will no longer fall into an infinite loop when it encounters a $ SET HDR or $ SET PAGE 
dollar option card. 

P1617 DASDL - FREE PROPERTY BUFFER FOR ACCESSES 

DASDL will no longer terminate with a software error at 30106500 when a data base with many 
accesses is compiled. 

P1686 DASDL - PREVENT SPURIOUS MESSAGE 

DASDL no longer displays the spurious message "<data base name> UNASSIGNED DELETED" during 
update. The description file which DASDL produced was correct despite the message. 

P8913 DASDL - INVALID AUDIT "AREAS I ZE" WITH "SEGMENTS" 

DASDL will no longer produce an erroneous AREASIZE when the audit trail AREASIZE was specified 
In "SEGMENTS". 

P8914 DASDL - REORGANIZATION OF DATA SET 

Reorganization information handling within the DASDL compiler has been corrected for data sets 
with accesses. 

P8916 DASDL - EXPAND DESCRIPTION FILES 

DMS II will now handle data bases whose descriptions exceed 65536 words. 
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P8950 DASDL - VARIABLE FORMAT REMAPS 



A syntax error will now be given when an item from the fixed part of a data set record is 
included in a variable part of a remap. Previously, the error was given only when the 
properties of the item were respecified. 

P9053 DASDL - "VERIFYSTORE" TEXT FOR REMAPS 

The VERIFYSTORE text for remaps is now generated correctly for certain instances of HIDDEN and 
READONLY items. The effect of the problem would have been erroneous DATAERROR exceptions. 

P9074 DASDL - OPTIMIZE STORAGE OF INITIAL AND NULL VALUES 

The common storage of BLANK and ZERO initial and null values in the description file has been 
corrected. 

P9088 DASDL - MINUS SIGN PROBLEMS 

DASDL no longer carries a minus along to numbers following a negative number in in a condition. 
The following example now produces the proper text: 

X LSS -1 OR X GTR 1 

P9089 DASDL - SETS WITH NAME "DATA" 

DASDL no longer permits a set or subset to have the name "DATA". Using this name would result 
in the file titles of the set and data set being the same. An error message is now given. 

P9090 DASDL - "DIVIDE BY ZERO" 

DASDL no longer does a divide by zero when computing the default areasize of a data set whose 
bloeksize is one word. 

P9091 DASDL - NON-USERCODE DATA BASES 

DASDL will now put the description file and utility, recovery, datarecovery and reconstruct 
programs under the system directory (rather than the running usercode) when the following is 
specified: 

COMPILE *DBNAME 

Formerly, this condition was only applied to the ACCESSROUT INES . 

P9095 DASDL - COMPILE RECONSTRUCT WITH "DBNODE" DEFINE 

DASDL now uses a define for the location of the "DBNODE" when zipping the compile for 
reconstruction. 

P9186 DASDL - GROUP KEYS FOR RANDOM/ INDEX RANDOM 

Certain keys for random accesses and index random sets were not being handled correctly. The 
affected cases were those keys whose last element was a group which in turn had its last 
element end on an odd digit boundary. 

Examples: Gl GROUP (M NUMBER(3); N NUMBERO); ); 

G2 GROUP (M NUMBER(3); A ALPHA(2>; N NUMBER(3); ); 

In such cases, selection expressions using the items of the group (FIND AT M = value AND N 
value) could fail to find existing records with the specified keys. 

Random and index random, only, are affected because of their folding of the entire key. The 

correction of the problem will change the blocks in which keys are to be found. Therefore, for 

existing data bases with such structures, the following corrective procedure should be 
followed: 

1. DASDL update compilation, using new compiler. 

2. Generation and execution of reorganization program, regenerating index random sets 
from the data sets they span. 

3. Recompl lat ion of ACCESSROUT INES . 

P9252 DASDL - "NOT FOUND" EXCEPTIONS IF ENTIRE KEY GIVEN 

Improper NOT FOUND exceptions are no longer generated for certain FIND operations. The problem 
occurred when all elements of mu I t I p I e- i t em key were specified and the key ended with signed or 
descending ileus, 
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P9362 DASDL - AUTOMATIC SUBSETS OF SETS 

In certain cases, the key structure of a set which had an automatic subset specified against it 
was being set up incorrectly. The problem has been corrected. 

If an existing data base has an affected set, UPDATE using a new DASDL compiler (with this 
change) will be unsuccessful. In such cases, the set must be deleted from the data base, added 
bach and regenerated via REORGANIZATION. 

P9263 DASDL - PRINTING FILE TITLES 

When the STORE or FILE (for III.O only) dollar option is set, a question mark no longer appears 
at the end of titles of files on system resource pack. 
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D2219 DMALGOL - NODE SYNTAX 

The DMALGOL node declaration "NODE X*" has been eliminated. This 
because of rather unfortunate semantics of "N[I]", where N is a node. 
"X[N[I]]" to retrieve the contents of NCI]. Now the semantics of N[I] 
contents of NC I J . To compensate for this change, it is necessary, 
remove the "X*" declaration and change references like "XCNII]]" to ' 



construct was required 
It was necessary to use 
does in fact produce the 
in most cases, to merely 
N [ I ] " . Where constant 



subscript values 
D2276 DMALGOL - PRINT 



were used, new properties have been defined for use instead. 
"Dl" STACKSIZE 



When compiling ACCESSROUTINES , the Dl stack size is printed along with the D2 
sizes at the end of each structure environment. Note that while the D2 and D3 
stack sizes for each environment, the new Dl value is the accumulated Dl stack 
structures compiled so far. 



and D3 stack 

values give the 

size for all 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

DMS II - DMALGOL 

PI 606 DMALGOL - DATA POOLS IN "I/O" LISTS 

It was possible for the presence of long strings in I/O lists to cause system dumps at 
FORGETCHECK at run time. This has been corrected. 
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DMS II - DMCONTROL 



DE435 DMCTL - UNAUDITED DATA BASE CONTROL FILE RECOVERY 

The "RECOVER" functions of DMCONTROL are now permitted for unaudited data bases. They are 
intended for use only under very limited circumstances. In all cases, the user should have 
extra knowledge about the state of the data base. In general, when a control file is lost, the 
only safe action is reloading and reprocessing (for unaudited data bases). There are some 
cases where making a new control file is all that is ncessary (e.g., the control file is on a 
pack separate from the other files and that pack went bad). It is for such cases that these 
functions are permitted. 

D2436 DMCTL - HALT/LOAD BIT OVERRIDE 

A way of resetting the Halt/Load bit (also called the data base in-use bit) for unaudited data 
bases has been provided. It is accomplished by doing the following: 

RUN SYSTEM/ DMCONTROL ("OVERRIDE HL"); 
FILE CF=<control file name>; 

The result will be a control file with the bit reset to zero. 

In general, the Halt/Load bit being on raises questions about the integrity of the data base; 
therefore, this function is intended only for use in very limited circumstances when the user 
has more knowledge about the state of the data base than does the control file. It is not a 
general alternative to normal recovery via reloading and reprocessing. Using this function 
requires the utmost care; this function not be used when there is even the slightest doubt 
about the state of the data base. 



Error messages 
DMCONTROL will 



will be 
require 



produced if the data 
exclusive use of the 



base 
file 



audited or the bi 
order to perform 



t is not on 
this function. 



initial 



D2458 DMCTL - VERSION OVERRIDES RECORDED 



The date of the occurrence of a version mismatch override will now be recorded 
file and be made to appear in data base software program dumps. 



the control 
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PI 021 DMCTL - BETTER DISPLAYS FOR CONTROL FILE CHECKS 

The control file module now emits more informative displays for control file /DB software 
mismatches. 

PI 022 DMCTL - INVALID CONTROL FILE CREATION FOR PARTITIONS 

The control file is no longer built incorrectly for partitioned data bases. Formerly, 
DMCONTROL may have dropped some partition entries from the control file. 

PI 276 DMCTL - INVALID VERSION TIMESTAMP MISMATCH 

The control file module no longer emits an invalid "WRONG VERSION OF FILE ..." when two system 
software programs are running (e.g., UTILITY and ACCESSROUTINES, DATARECOVERY and 
ACCESSROUTINES, etc.). To effectively use this change, SYSTEM/DMCONTROL must be recompiled 
first and a new DATABASE/DMCONTROL (symbol) must be made including this change. Only UTILITY 
and DATARECOVERY must be recompiled after this (including the new DATABASE/DMCONTROL). 

PI 347 DMCTL - SEPARATE INCLUDE OF "CF, CFOLD" 

A program can now include the declarations and defines for CF and CFOLD at separate places in 
the symbolic. 

PI 349 DMCTL - CHECK FOR VALID STRUCTURE NUMBER 

A new case has been added to the CF module so that it is possible to tell if a structure number 
is valid. UTILITY uses this check when setting up its directory of files to be reconstructed 
so that it does not include deleted files. 

P1636 DMCTL - REBUILD FROM "1 1. 8" DUMP TAPES 

DMCONTROL will now initialize creation timestamps in the control file to zero under the 
"INITIALIZE 29" command. This will allow post — I I .9 rebuild software to work with II. 8 dump 
tapes. 

P9082 DMCTL - OPTIONAL FILE WHEN INITIALIZING CONTROL 

When updating the description file for the first time from II. 8 to II. 9 or II. 8 to III.O, 
DMCONTROL will initialize the control file. During the initializing process, DMCONTROL will 
also attempt to initialize DMTIMESTAMP in all existing data base files. This permits the user 
to respond as follows when a data base file is not present (excluding restart data set): 

AX: CONTINUE 

If the user utilizes this option, a time stamp mismatch will occur when the data base software 
opens this file(s) at run lime. (This mismatch may be overridden at run lime.) 

P9092 DMCTL - OPTIONAL PROGRAMDUMP FOR CONTROL FILE ERRORS 

The control file module will now ask the user whether or not a programdump is desired for 
certain control file errors. 

P9301 DMCTL - CONTROL FILE COMPATIBILITY ACROSS RELEASES 

The control file module now handles the control file format differences across releases. The 
II. 9 module now accepts III.O control files for all data base software (provided update level, 
data base limestamp, etc., are compatible). The III.O module accepts II. 9 control files for 
the following cases: 

1. Description (DASDL) update from II. 9 to III.O. 

2. Control file (DMCONTROL) update from II. 9 to III.O. 

3. Control file (DMCONTROL) recovery from II. 9 to III.O. 

4 . Control file handling from utility dump tapes (UTILITY). 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - HELP INQUIRY 



D2H59 HELPINQ - NEW "HELP" FILE 

An entirely new DMINQ/HELP file has been created. All the syntax diagrams and semantic 
explanations are new, using upper and lower case characters (lower case will appear as upper 
case on terminals with no lower case capability). 

Also, the information has been updated to include III.O features. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - HELP INQUIRY 



P9087 HELPINQ - CORRECT SYNTAX DIAGRAM 

A minor error has been corrected in the syntax diagram produced by the HELP verb for the SORT 
option of SELECT/DISPLAY. SORT and REPEAT may appear in any order, rather than SORT first, as 
implied by the incorrect syntax diagram. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - INQUIRY 



D2251 INQ - "QUIT" 



Since it may take several seconds to terminate an INQUIRY session after typing QUIT, the 
INQUIRY program now responds with "TERMINATING INQUIRY" just prior to closing the data base. 

D2t08 INQ - PRINTER FILE ATTRIBUTES 

Primarily as a result of new report features in INQUIRY, it has become desirable to be able to 
control file attributes for the printer file used by INQUIRY. Such attributes include, but are 
not limited to, f ormmessage , kind, etc. 

The new feature is an extension to the INQUIRY statement "PRINTER". A new option, "FILE", is 
used to change the intname attribute of the INQUIRY printer file. This will associate with the 
printer file any file attributes specified for that file name at the time the INQUIRY program 
is initiated. 

Note that the user must anticipate any special requirements for the printer file. This need 

not be a serious drawback, since it seems likely the user can anticipate the creation of a 

report requiring, for example, special forms. It should be clear that this feature is not 

required to produce normal printer files, but only when the user wants to do something 
"unusual". 

The syntax for the new printer option is: 



— FILE <filename>- 

I I 
I- = -I 



where <filename> is an identifier, 



If the printer file is already open, it is closed. Then, the title of the printer file is set 
to the given <filename>; finally, the intname is set to the <filename>. If no file-equation 
WFL statement had been supplied for this file name, the file reverts to the default printer 
file with the given <filename> as its title. Note that the original intname of the printer 
file is "PRINTER". The file Is not actually opened until some INQUIRY statement requires it, 
so this process may be repeated as necessary. The use of the "PRINTER" INQUIRY statement with 
no options displays the current setting of all options, including the new file option. 

D2t09 INQ - MULTIPLE-STATEMENT DEFINES 

I . Genera I 

The original DM INQ define mechanism permits the user to "define" anything that can be entered 
with a single input. This can range from a simple identifier synonym to an entire DMINQ 
statement. Since statements are always terminated by "END-OF-L INE" , there can never be more 
than a single statement per input; thus a define cannot contain more than one entire statement. 

An extension to this define mechanism has been implemented which permits a define to contain 
several statements. A side-effect of this extension is the ability to enter more than a single 
statement with one input for immediate execution, not just as the text of a define. 

The basic idea is to use a special delimiter, the semicolon (";"), as a separator between two 
statements entered with one input. However, there are certain restrictions and requirements 
which apply when declaring and invoking multiple-statement defines: 

1. A multiple-statement define must contain complete statements. This does not exclude the 
invocation of other defines; however, any statement "started" in a multiple-statement define 
cannot be "completed" in another multiple-statement define. 

2. A multiple-statement define may be invoked only where a statement may occur; that is, first 
in an input or multiple-statement define text, or after a semicolon. 

3. The invocation of a multiple-statement define must be last in an input or multiple-statement 
define text, or must be followed by a semicolon, 

t. A multiple-statement define may not contain a define, EDIT, or REPEAT-w i t h-EDI T statement. 

It may be helpful to think of a multiple-statement define as a "subroutine", containing 
complete statements; an invocation of a multiple-statement define is itself a statement, just 
like a subroutine "call". However, like any define, the multiple-statement define is not 
parsed and verified until its invocation, so violation of these rules, or other syntax errors, 
may not be detected until later. 
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Changes have also been made in the syntax and/or semantics of related verbs to facilitate 
modification of multiple-statement inputs and defines (see below). 

II. Syntax 

A <bas ic-stalement> is any INQUIRY statement except a define, EDIT, or REPEAT-w i t h-EDIT 
statement. 

A <msd-invoke> is an invocation of a multiple-statement define (the define identifier together 
with parameters, if any). 

A <logical-statement> is any <basic-statement>, or a <msd-invoke>. 

The <t«xt> of a multiple-statement define Is two or more <logical-statement>s, separated by 
semicolons (and optionally followed by a semicolon), or a single <logical-slatement> followed 
by semicolon. The <text> of an ordinary define never contains a semicolon. 

Since the <text> of a multiple-statement define may not contain a DEFINE, EDIT, or 
REPEAT-w i th-EDI T statement, these statements occur only in "normal input", and are terminated 
only by the "END-OF-LINE" . 

If an error occurs during the execution of any statement in a multiple-statement define, at any 
level of invocation, all remaining statements in invoked multiple-statement defines are ignored 
and the system waits for the next user input. It is assumed that the statements are designed 
for the "normal" situation, and that an error is abnormal. 

III. Other changes 

In order to facilitate the modification of multiple-statement inputs in general, and of 
multiple-statement defines in particular, changes have been made in the syntax of EDIT (and 
REPEAT-wi th-EDIT) , and in the semantics of SHOW and RECALL. 

Whenever the "SAVETEXT" buffer contains a multiple-statement define or a multiple-statement 
input, "SHOW" will display each statement on a separate line, preceded by a line number and a 
colon (:). Similarly, since "RECALL" always performs a SHOW after placing the requested text 
into the savetext buffer, a RECALL of a multiple-statement define will also break the text up 
into separate lines. 

An extension to EDIT makes it possible to EDIT only the text of a specific line. It is merely 
necessary to enter the line number prior to the first delimiter. The line number must 
correspond to one of the lines displayed with the SHOW, or a syntax error will result. The 
line numbers are never saved, but merely indicate the position of the line within the entire 
text. If any change inserts new statements, or deletes current statements, the line numbers of 
succeeding lines will, or course, change. Once again, an EDIT operation will perform a "SHOW", 
so the new text and new line numbers will be displayed. 

Note that EDIT does not REPEAT, or re-process, the modified text. Thus a sequence of 
modifications may be lost if REPEAT is not entered prior to other input. The REPEAT-WI TH-EDIT 
statement may be used to cause the new text to be processed immediately. 

IV. Examples 

DEFINE DKX.Y) = CLEAR X; VIRTUAL X = N OF D + Y; SHOW X 
DEFINE D2(X,Y) = VIRTUAL X = N OF D + Y 
DEFINE D3(X,Y) = VIRTUAL X = N OF D + Y ; 

The defines Dl and D3 are multiple-statement defines (since they contain at least one 
semicolon); as such, they may be invoked only as complete statements. D2 , even though it 
appears to be a complete statement, is not a multiple-statement define because it contains no 
semicolon. It may be invoked as part of a larger statement, such as 

D2(V2, 2) - 10 
Which is equivalent to 

VIRTUAL V2 = N OF D + 2 - 10 

If virtuals VI, VS and V3 are declared by the statements 

D1CV1 ,1) 
D2(V2.2) -10 
D3(V3,3) 

Then RECALL VI will display 

VIRTUAL VI = N OF D + 1 
And similarly, RECALL V3 will display 

VIRTUAL V3 = N OF D + 3 
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However, RECALL V2 will display 

D2(V2,2) -10 

RECALL DEFINE 01 will display the following: 

01:DEFINE DHX.Y) - CLEAR X; 
02: VIRTUAL X = N OF D + Y; 
03: SHOW X 

# 

EDIT /D/Z will produce: 

01:ZEFINE DKX.Y) - CLEAR X; 
02:VIRTUAL X = N OF D + Y; 
03: SHOW X 

# 

Note that the first "D" of the entire text was changed (normal EDIT). However, EDIT 2/D/Z will 
change the first "D" of line number 2: 

01:DEFINE DKX.Y) = CLEAR X ; 
02:VIRTUAL X - N of Z + Y; 
03: SHOW X 

# 

D2tl0 INQ - REPORT FACILITY FOR "DMSII INQUIRY" 

This document describes an interactive REPORT option for the DMSII INQUIRY system. 

The REPORT option is intended to be used to produce simple reports from information held in 
DMSII data bases. The COBOL report facility or the "REPORTER SYSTEM" (document #1079555) can 
be used to generate complex reports or reports for non-DMSII data. 

Report definitions can be saved through sessions by utilizing the mu I t i -s t a t emen t define 
mechanism. 

REPORT OPTION 



The REPORT option consists of three new statements TITLE, REPORT and SUMMARY plus additions to 
three existing statements RECALL, CLEAR and GENERATE. 

REPORT STATEMENT DETAILS 
REPORT/PAGE TITLES 



TITLE — REPORT <title list>- 

I — II II 

I- PAGE —I I- = -I I- NONE 



<t i I I e I ist> 

|< 1 

I I I I 
I l<- / -I I 
I I 
DATE 



I 

I- TIME 1 

I I 

l-<quoted string >— I 



1. REPORT will produce a title page for the report. The title will be centered on the page. A 
report title page is optional. 

2. PAGE will produce a title on the top of every page of the report. A page title is optional. 

3. DATE will print the date as part of the title in the form: 

MONTH/DAY/YEAR Example: 9/19/76 

4. TIME will print the current time as part of the title in the form: 

HOUR:MINUTE Example: 9 : "+5 

B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 DMS II - INQUIRY 



PAGE 85 
MARK 3.0 

5. The length of the quoted string cannot exceed line width. 

6. A slash (/) may be used to produce multiple line titles. 

7. The option NONE will eliminate a previous title. 

Examp I e : 

TITLE PAGE "A PAGE TITLE" / DATE /TIME 

will produce on each page 

A PAGE TITLE 
9/19/76 
8:30 

REPORT VERB 

The report verb controls which items are listed on the report. In addition it provides control 
over the format of the report. 



— REPORT — <report lisl> 

<report list> 

__ < | d | igt > 

I I 

|-<control I I 3 1 >- I 

<conlrol list> 

|< , | 

I I 

< i d > 

III I 

I- PAGE -I I- TRUNCATE -I 



<id I ist> 

l< 

I 
<id> — 



I II II I 

|-<co I start>-| I -<co lwidth>-| I- TRUNCATE -I 



<colstart> 

o <integer>- 

I I 
I- AT -I 

<co I w i dt h> 



# <integer> 

I I 

I- WIDTH -I 
I I 

I- FOR —I 

<id> 

< i tem>- 



I I 

I -< c o I n ame >-- - - I 
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GENERAL 

Item may be any of (he following: 

1. Any data base item name (but not a group name). If the item has an OCCURS, the subscript may 
be an arithmetic expression. 

2. Virtual item. 

3. An arithmetic function. 

4. An arithmetic expression. 

The <colname> option allows the user to specify the name that will be printed on the report. 

If <colname> is not specified, the item name will be used as the column name. <colname> 

(which cannot exceed 17 characters) can be any alpha-numeric literal which begins with an 
alphabetic character. 

No attempt is made to "qualify" the items, expressions, virtuals, etc., which appear in the 
<report list>. Reference to items in "NOT-FOUND" data sets will be displayed as undefined 
(two hyphens). Referencing items in data sets which are not selected will result in 
cancelling the report with a "NOT SELECTED" error. 

A. <control list> 



Items appearing in the control list are considered to be control Items. A control break occurs 
when the value of any control item changes between two adjacent records. (See SUMMARY 
statement.) To provide proper report generation control, the selected records should be SORTed 
in order of the control items, if the selection is not already in that order. The SET statement 
should be used to specify the sort criteria to avoid redundant calls on the system sort 
intrinsic. 

Examp I e : 

(USER INPUT) 



REPORT CLASS : NAME , YARDS , TD=T0UCHD0WNS 
SELECT VIA CLASSET AT CLASS="PASSING" OR CLASS- 
GENERATE REPORT VIA HALL-OF-FAME 

(SAMPLE PAGE RESULT) 



'RUSHING" 



PAGE 1 



CLASS: PASSING 






NAME 


YARDS 


TD 


UN I TAS, JOHNNY 
TARKENTON.FRAN 
TITTLE, Y. A. 


40239 
38840 
33070 


290 
291 
242 


CLASS :RUSHING 






NAME 


YARDS 


TD 


BROWN, JIM 
PERRY, JOE 
TAYLOR, JIM 


12312 
9723 

8597 


106 
71 

83 



Note that items in the <conlrol list> are printed in the form: 

NAME: VALUE 

and the column heading is repeated. 

The TRUNCATE option is ignored for non-alpha variables and for alpha variables where the 
number of characters in the variable will fit on the remainder of the line. 

If TRUNCATE is specifed for an alpha variable which will not fit on a line, the left most 
charaters (sufficient to fill the line) will be printed and the remaining characters will be 
lost. 
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IF TRUNCATE is not specified, Ihe entire alpha variable will be printed taking multiple 
lines; if necessary, however trailing blanks will be suppressed. 

More than one control item may be specified. In addition, if the option PAGE precedes a 
control item, a page eject will also occur when the control item changes value. 

The PAGE opt i on i nd i cat es that a new page should be started if a control break occurs. 

Examp I e : 

REPORT PAGE DEPT, SECT : NAME. ROOM 

RESULT: 



DEPT:6700 
SECT: 67 10 



NAME ROOM 
DOE, JOHN 421 



PAGE 3 



SECT: 6720 
NAME 



ROOM 
SMITH, JOHN 527 



DEPT: 6800 
SECT: 6810 




NAME 
DOE. JOHN 


ROOM 
435 


SECT: 68 10 




NAME 
DOKES.MARY 


ROOM 
645 



PAGE 4 



B. <id I i st> 



1. Those items specified in the <id list> will be printed in a "columnized" format. 

2. The <colslart> option allows the user to specify the starting position of a column on the 
report page. 

3. If <colstart> is not specified, it is assumed that the column will start one character 
beyond where the prior column finished. 

4. A "COLUMN OVERLAP" error will be displayed if <integer> specifies a position less than the 
position beyond the end of the prior column. 

5. The <colwidth> option allows the user to specify the number of character positions in which 
a value is to be formatted. 

6. If <colwidth> is not specified, a column width is assumed to be the largest of either the 
number of characters in the column name or the number of characters it takes to present the 
data value without loss of significance. This may result in a "REPORT TOO BIG FOR LINE" 
error. 

7. If the <colwidth> specified is not large enough to hold the column name, the <colwidlh> is 
ignored and a column width large enough to hold the column name is assumed. 

8. The <colwidth> may be specified much larger then necessary to space the items evenly across 
the report page. 

9. If the <colwidlh> specified is not large enough to hold the data to be formatted, the action 
depends on the data type. 

NUMERIC: The value will be rounded to fit within the <colwidth> specified. If this cannot 
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be done without loss of leading significant digits, <colwidth> will be filled with 
* characters. 

BOOLEAN: The left most portion of the TRUE or FALSE will be placed in <colwidth>. 
ALPHA : See the TRUNCATE option 
C. TRUNCATE option: 

The TRUNCATE option is ignored unless a <coiwidth> is specified. 

If the TRUNCATE option is not specified, the entire alpha variable will be printed even if it 
takes multiple report lines to do so. 

EXAMPLE: 

REPORT B I GALPH : A-NUM , CMMT# 1 9 , ANOTHER-NUM , CMMT-2# 1 8 
RESULT: 

B I GALPH: A LONG ALPHA VARIABLE USED AS A CONTROL ITEM AND WHEN TRUNCATE 
IS NOT SPECIFED. WILL RESULT IN MULTIPLE LINES OF PRINT, IF 
NECESSARY, TO PRINT THE ENTIRE ALPHA VALUE 

A-NUM CMMT ANOTHER-NUM CMMT-2 



23.66 THIS IS AN ALPHA 1 MULTIPLE LONG 

VALUE WHICH WILL ALPHA IS ALLOWED 

TAKE MORE THAN ONE IN THE SAME REPORT 

LINE TO PRINT LIST 

104.73 WE WILL ALWAYS TRY 2 A SHORT ONE 
WHEN POSSIBLE TO 
SPLIT AT A BLANK 

108.98 A SHORT ONE 3 NOTE EITHER LONG 

ALPHA MAY CAUSE 
MULTIPLE LINES 

108.97 TRAILING BLANKS ARE 4 NEXT IS NULL 
SUPPRESSED 

108.98 ANOTHER SHORT ONE 5 — 

If the TRUNCATE option is specified, and the column width is smaller than the number of 
characters in the alpha variable, only the left most <colwidth> characters are placed in the 
co I umn . 

EXAMPLE: 
REPORT BIGALPH TRUNCATE :A-NUM,CMMT #19 TRUNCATE , ANOTHER-NUM 
RESULT: 

BIGALPH: A LONG ALPHA VARIABLE USED AS A CONTROL ITEM AND WHEN TRUN 
A-NUM CMMT ANOTHER-NUM 

23.66 THIS IS AN ALPHA VA 1 

10t. 73 WE WILL ALWAYS TRY 2 

108.98 A SHORT ONE 3 

108.97 TRAILING BLANKS ARE 4 

108.98 ANOTHER SHORT ONE 5 

SUMMARY VERB 

The SUMMARY verb provides statistical Information about items in the report list. 
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SUMMARY 



I- FOR 



I I 
I I- 



CONTROL 
REPORT - 



— NONE 



l<- 



- COUNT - 

- AVG — 

- SSQ — 

- MSQ — 

- VAR — 

- STD — 

- SUM — 

- TOTAL - 

- MIN — 

- MAX — 



l<- , -I 
I I 
— <id> ) 



1. <id> must reference an <id> in the <reporl l!st>. If the <colname> is used in the <report 
list> for an item, <id> must be the <colname>. 

2. TOTAL and SUM are synonymous. 

3. The REPORT statement must be entered before entering a SUMMARY statement. 

4. The option NONE will eliminate a previous SUMMARY statement 

5. For SUMMARY CONTROL, <id> must be in <id list> 

6. For SUMMARY REPORT, <id> can be in either <control list> or in <id list>. 

7. Both SUMMARY REPORT and SUMMARY CONTROL can be used within a single report. 
A. Summary for Control 

A control break occurs each time a control item in the report 

list changes value. At this time any specified summary control Information is processed and 
displayed. 

Example: 

TITLE PAGE "REPORT" 

REPORT D1:E1,E2 

SUMMARY FOR CONTROL AVG (E1.E2), SUM (El) 

SET D TO SELECT D1>0,SORT ON Dl 

SET E TO SELECT El >0, SORT ON El 

ATTACH E 

GENERATE REPORT VIA D 

RESULT : 



Dl 



AVG 

SUM 



23 
El 

1 

3 

e 

4 



REPORT 



PAGE 45 



E2 

2 
4 



B. Summary for Report 
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The report summary is printed as an extra page after the report is generated, 
Example: 

SELECT VIA D 

REPORT Dl ,D2,D3 

SUMMARY FOR REPORT AVG (Dl), SUM (Dl DP) 

GENERATE REPORT D 

RESULT: 



REPORT SUMMARY 

AVG Dl = 148.92 

SUM Dl = 72, D2 = 57 



GENERATE REPORT 



— GENERATE — REPORT < d ata set id> 

— I I | 

I- VIA -I |- HOLD 



The GENERATE REPORT statement will cause the generation of the report. 

Ind/or'ATTACH verbs'' 3 '"" <dalS ' ' * '"' mU5i haVe been P^ 1 '"*'/ established by SELECT, SET 

Ifjultiple copies of the report are desired, this statement may be repeated as many times as 

Note: If batch programs are concurrently updating the data base, each report may be different. 
The report generation process can be cancelled by entering 
?AX 

is" l held° L ?„?-f i0 ?>. i5 US8d ' U ! rep ° rl generation process is started, but the first output line 

:;:::!::;::£!!: "!: ^^.iJ™^""''"- ^.trw:::::.!- r: 

CLEAR REPORT 



CLEAR — REPORT 



The CLEAR REPORT statement returns all internal storage used to "remember" the reoort 

"'"':, 8n , generate the report. It is desirable tS enter th si f„ r ,: 
r. de no! I" l ° aV °' d P ° S3,ble »»' 11 " "•*•••" • pr.vlou. report deflnitio a I 



>P 
RECALL 



l!tion' s u{eLnts ALL ° Pli ° nS C8n "" USed l ° reCi "' edil and correcl Pr e v i o us I y-en t er e d REPORT 
— RECALL — REPORT ,__ , 



SUMMARY — CONTROL - 
I- REPORT — 



- TITLE — PAGE 

I 

I- REPORT — 
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In some cases, changes to the report list may require changes to the SUMMARY statement. 
FORMS MEDIA CONTROL 

A. Physical Attributes 

1 If option TERMINAL is set, the report will be generated lo the user's terminal. The page 
size and line width will be assumed to be that of the terminal attributes width and page 
(see verb TERMINAL in the DMSII INQUIRY Manual). For hardcopy terminals or when connection 
has been established by dialin, the terminal attributes UIDTH and PAGE should be checked/set 
prior to generating the report. 

8. If option PRINTER is set, the report will be generated to a site line printer. The page size 
and width used in the report generation process will be assumed to be that of the printer 
w?dth and page attributes (see verb PRINTER in the DMSII INQUIRY Manual). 

The terminal or printer attributes must be established prior to generating the report. 

B. Page Control 

The REPORT option, when detecting a new page is necessary, either due to a page eject or the 
page is full will: 

1. If option PRINTER is set, a skip to channel 1 will be executed. The carriage control tape on 
the printer must be coded accordingly. 

2. If option TERMINAL is set, 

A. Sufficient blank lines are written to ensure a full page. 

B. If SCREEN is FALSE, four more blank lines will be printed. 

C. If SCREEN is TRUE, the system will stop until either a null input or blank line is 
entered by the user. 

D2581 INQ - RIGHT-JUSTIFY NUMERICS IN "DISPLAY" VERB 

Values of items for the HEADING format of the DISPLAY verb are now printed r i g h t -j u s I i f i ed in 
the column instead of I e f t- j us t i f i ed . As a result for mos t numeric . terns , value in columns 
will be aligned by decimal point. Also, the heading formal of DISPLAY is now consistent with 
the format of the INQUIRY REPORT option. 

D25B7 INQ - ERROR MESSAGES 

The error message which explains an error is now displayed unconditionally. Previously, it was 
displayed only after the user entered HELP. HELP continues to work as before. 
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P1023 INQ - CORRECT CHECK FOR NAME CONFLICT 
DMS I I INQUIRY will new alio* define, virtual and generate Idenlifier names even though the 
p.rml S9 ?il.. are Same " " INQU " RY V6rb " amei 8 '9" * define SELECTXXX is now 

P1061 INQ - LARGE SELECTION CONDITIONS 

A selection condition containing many terms could produce an INVALID INDEX fault. This problem 
nas oeen corrected. - r ■ w « . o m 

PI 062 INQ - IMPROVED SEARCH ALGORITHMS 

hav/h a ^ h -^^ r 'i hmS TK Sed '" INQUIRY 4 ? fInd records which satisfy a given selection condition 
have been improved. There are three main areas of improvement: 



When there ar e se v e r a I s e I s which could be used to access records, the system now does 
much better job in picking a set which will minimize search time. 



2 ' !!™!r» e 'J^h' eCUd u hi ^ x aS ' - ey ?°"P?" d of several concatenated items, a mu c h- i mpr o ve d 
binary search results ,f the major key items are included in the selection condition, with 
appropriate" relational operators. ' 

3. If a set is explicitly mentioned by the user (e.g., SELECT S AT ... or DISPLAY VIA S AT 
;;;';;„ h ^ el J er 1 ! eal ' ch via that set will be performed. Previously, such a situation usually 
resulted in testing every record in the data set. ' 

P152H INQ - "SEG ARRAY" FAULT ON INPUT 

A SEG ARRAY fault would occur when an excessively long line was entered after the system had 
filled a screen and was waiting for a "NEXT" input. This has been corrected. * 

P1525 INQ - QUALIFICATION RESOLUTION 

Uhe "WHICH e ONF?" ll*llAl r e s ° ' ve . ? nsuf f Tcient qualification by choosing among alternatives 
(the WHICH ONE? message), a meaningless error message could result. This has been corrected. 

PI 536 INQ - "INQUIRY" USES SUBSETS IMPROPERLY 

It was possible for INQUIRY to pick a subset for record selection instead of a full spanning 

is '7. h :V sel or daU set was specified). This could find fewer records than ac? a 
INQUIRY sysUm cond.t.on. This problem did not exist prior to Release II. 9. 2 of the 

P1B15 INQ - LOSS OF LAST COLUMN 

1° line 8n lh a d n U th e lllV-?* ^S,™""'"" wraparound. INQUIRY will write one character less on 
L.lLA lhan .J he s Pecfied WIDTH; an error, however, caused data to be formatted into the last 
character position of a line which was lost when displayed. This has been corrected. 

P1618 INQ - "GENERATE" IN A PARAMETRIC DEFINE 

It was possible to get an "UNKNOWN IDENTIFIER" error when invoking a parametric define 
containmg a GENERATE statement. This error referred to the internal form of he formal 

parameter. It has been corrected. luimuitneTcrmai 

P1619 INQ - CORRECT REPORT HEADING FEATURE 

oaa , e hl»d\nn S n n 9 !\ CO »h eC f ed ? hUh C °^ ' d Cause lho REP0RT °P lI °" ° f DMS H INQUIRY to print the 
pageheadingonlyonlhefirstpageofareport. 

P1620 INQ - REPORT PAGE EJECT 

INQ now causes a page eject on the printer after a report is complete. thus preventing the 
start of one report on the same page as the last page of a previous report. 9 

PI 623 INQ - RANGE TEST 

ERROR" C a!°run X t;m" i0n ° f ^ fo " 0tf!n 9 form; ! - e -' a ran 9» t.sl. could produce a "SOFTWARE 

K > <value> AND K < (value) 
This has been corrected. 
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P1687 INQ - ERROR ON USER SUPPLIED SUBSCRIPT 

A problem has been corrected which caused a SUBSCRIPT OUT OF RANGE error when displaying a 
subscripted item were the subscript was specified by the user. 

PI 688 INQ - DOUBLE SPACE ON "CRT" TERMINALS 

A problem has been corrected whereby, under certain conditions, d I sp I ay i i ig a line in format 
HEADING could cause a CRT terminal with wraparound capability to double space. 

PI 689 INQ - "SEG ARRAY" ON SPECIAL CHARACTER 

If, in certain contexts, a "special character" (non-alpha numeric) were entered where an 
identifier was expected, a SEG ARRAY fault would occur. This has been corrected. 

P1690 INQ - "RESTORE" LARGE TEXT 
It was possible for RESTORE to fail with a SEG ARRAY fault if the text being restored occupied 
more than 256 words. This has been corrected. 

PI 691 INQ - NESTED DEFINES 

Nested defines were not always expanded properly. This has been corrected. 
P1692 INQ - CORRECT ABBREVIATIONS, REPORT CONTROL ITEMS 

The scanning of some keywords has been changed to allow keyword abbreviations. 

A problem has been corrected which, under some conditions, caused a failure of the printing of 
the name and value of a control item. 

P1693 INQ - SOFTWARE ERROR 

A software error (at 6451t000>, which sometimes resulted from a condition of the form A=<value> 
AND B=<value>, where A and B were both major hey items for some set, has been corrected. 

P9015 INQ - "SEG ARRAY" ERROR 

A SEG ARRAY error no longer occurs if an excessively long logical input (several physical 
inputs connected by the "X" continuation symbol) is entered. 

P9016 INQ - "INVALID INDEX" 

An INVALID INDEX no longer occurs if a single "X" is input to INQUIRY. 
P9075 INQ - "INVALID INDEX" AT INITIALIZATION 

An INVALID INDEX fault could occur at initialization of INQUIRY if structures with structure 

numbers greater than 157 were invoked. This has been corrected. 

P9085 INQ - OPTION "QUOTES" 
The value of the QUOTES option was displayed incorrectly. It printed TRUE when false. and 
FALSE when true. This has been corrected. 

P9086 INQ - CORRECT SYNTAX ERROR 

An incorrect syntax error was produced in some cases of a function being used as part of a 
condition of another function. This has been corrected. 

P9179 INQ - DISPLAY OF EXCEPTION VALUE 

Whenever INQUIRY gets an unexpected exception from the ACCESSROUTINES, the exception value is 
displayed and partially analyzed. Incorrect and/or incomplete analyses of that value have been 
corrected. 

P9259 INQ - "SAVE/RESTORE" LARGE TEXTS 

Any define texts occupying more then 128 words could not be SAVE • d Properly. This IJj't '• 
unlikelj to be exceeded on II. 8 or II. 9, but may be exceeded with multiple statement defines on 
III.O. 
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P1596 LOADDUMP - FILLER DROPPED FROM "COBOL" FILE DESCRIPTION 

in A the M sourcI°??U d [I Vr i p \ ' " . ' P °" ^ '"""« '"• Ascription when there are. filler it, 
P169<+ LOADDUMP - SYNTAX ERROR WHEN MAPPING BIT FIELDS 




P1695 LOADDUMP - INVALID SYNTAX ERROR 

LOADDUMP no longer generates an invalid "VARIABLE FORMAT DATA SETS ARE DISALLOWED" when the 
data set specified is of fixed formal in a logical data base. nen the 
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PI 351 PRINTAUDIT - TIME OFF BY ONE SECOND 

Because the algorithm was rounding instead 
block was some t i mes off by one second, 
corrected. 



of truncating, the printed timestamp of the audit 
(The hex value was printed correctly.) This has been 
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PI 182 PROPERTIES - "DBS D3 NOMEM" 

?h?r^ V p ! ii ss^nMsopE^ 8 ;;^^ ■•■•" is a - iiabie '•- ihe ° 3 •*■"■. i' 

PB943 PROPERTIES - CORRECT DISCONTINUITY CHECKING 



The hand 
REORGAN 



?7i??nM f u diS u° nlinuil!e ? in the audit and contro ' f"e produced by OPEN INITIALIZE and 
ItftllUIN has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - PARTITION CONTROL 

P1024 PTNCTL - CHANGE INCLUDE RANGE ON "DATABASE/PROPERTIES" 

The include range on DATABASE/PROPERTIES has been altered to accommodate additions to 
PROPERTIES. 

PI 350 PTNCTL - WRONG FAMILY FOR GLOBAL DATA 

PARTITION CONTROL ignored the family specified InDASDL for the global data file, which caused 
a NO FILE if that file were not on the user's family. This has been corrected. 
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P1209 RECOVERY - TERMINATION CONDITIONS, "ROLLBACK, REBUILD" 
One of the termination conditions for ROLLBACK and REBUILD has the form: 

ROLLBACK TO BOJ OF < j ob#>/<m i x#> ON <date-time> 
f D , und da !Ti !me \h aS bee " ?9no [ ed b * both ROLLBACK and REBUILD. If the < j ob#>/<m i x#> i s not 

P1352 RECOVERY - ESSENTIAL, INESSENTIAL AUDIT RECORDS 




P1353 RECOVERY - MISCELLANEOUS REBUILD ERROR 

II-n!' e , a ? di i reccrds f °: l >! e l "? cntrol points which occurred immediately prior to a recovery 
point record were contained entirely within one audit block when illiinl n! , » „ 1/ 

FRROR" eCU Th ° f th ° aUdit i, RE COVERY y .o«.d terminate abnorma I I ?lnV "UN DEN?IF Ed'm SCELLANEOUS 

rnn?^-*- S-[ """J ° CCUr 0n tht f ' rSl audit r • C ° ' ■ >" * h • audit b I C k 8 f t J P t h . b I C k 

containing the audit records for the two control points. This has been corrected! 
P135t RECOVERY - REBUILD AFTER DELETING STRUCTURE 

If a utility dump were taken prior to an update which deleted a slmrtnr. . ,.t„Mj 

that discontinuity could f a i I ( INVAL ID I NDF.X . etc.! Th ! s has b e en c or r ec i ed aCr ° SS 

PI 393 RECOVERY - ORDERED DATA SET HALT/LOAD RECOVERY 

corrected. '" aPP ' y!n9 bef ° re im8 9 es of aud!t records against ordered data sets has been 
PlttS RECOVERY - STRETCH HEADER FOR CURRENT ROW 

RECOVERY no longer writes to the last segment of the current row to stretch the header Th. 

:tr? e wrir;'io ;„.',..; .....j,;-:? ;„.*„:.;•?..:•■ nseds lo be •-»^' '» *»>* S-'fecWii? 

PI 583 RECOVERY - "ROLLBACK" USING TAPE AUDIT 

hef^ C ?h? i f-/'i' di i ° n l ! pe would fai i wilh an "UNEXPECTED BLOCK SERIAL NUMBER" error Just 
before the final phase of recovery. This has been corrected. J 

PI 6 It RECOVERY - RESTART RECONSTRUCTION AT RESTART POINT 

PI 62 1 RECOVERY - REBUILD FAILS WITH ON-LINE DUMP 

Rebuild and reconstruct would fail with an "UNEXPECTED AUDIT RECORD TYPE" or INVALID INDEX if 
the dump used were taken on-line while RECOVERY was finishing. The prob I em has blen corrected! 

PI 631 RECOVERY - "ROLLBACK" GETS TIMESTAMP MISMATCH 

ine\^ B ^,r D : ^cl^n^s^^'i^^ch^rr^grro?::?;? 9 ' a timeslarap mi9mai ° h — - 

PI 632 RECOVERY - ERRONEOUS ROW LOCKOUT 

c!u?d ba ol:! n ?.?«i C K rl L 8in tyP ' 3 ° f a V dU r »«"<'* f <"- certain structures. the recovery process 

I/O trrlri ■ ! \ x * ' u " e r r °. r s • The ' • c o v e r y process must lock out any rows on which it Sets 

en or c(.d l ° pr ° CBed; consequently, rows were erroneous, y b.in locked .»! TM.'h.. 
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P1633 RECOVERY - "RECOVERY" TAKES PROGRAMDUMP ON ERROR 

RECOVERY now takes a programdump for abnormal termination. 

P163H RECOVERY - DATA RECOVERY SETTING BAD "EOF" POINTERS 

It was possible for data recovery to incorrectly set the end-of-file pointers to the end of the 
last row of the file for partitioned structures. This has been corrected. 

P1696 RECOVERY - "UNIDENTIFIED MISCELLANEOUS ERROR" 

It was possible for RECOVERY to get an "UNIDENTIFIED MISCELLANEOUS ERROR" at 503E5000 when 
processing an LGRA audit record as an after image, This has been corrected. 

P1701 RECOVERY - AUDIT BEYOND "BLKIMG" RECORD FAILS 

If there were any audit images for a locked out row after the BLKIMG audit record which caused 
the row to be locked, QUICKFIX would not apply them, but would still think it had fixed the 
row. (Such audit images could occur if several buffers for the row were in core at the time it 
was locked and they were subsequently modified, or if c r e a t e/ s t o r e s were being done beyond the 
end of file when the last row was locked out.) This could corrupt the data base. The error no 
longer occurs. 

P1702 RECOVERY - "LIMIT = THRU AUDIT" FAILURE 

If the input syntax to UTILITY for QUICKFIX for row lockout (recover rows using audit only) 
specified the prepass limit as "THRU AUDIT <integer>", RECOVERY would get a fatal error at the 
end of the prepass. This no longer occurs. 

P8975 RECOVERY - HANDLE AUDIT BLOCK SIZE CHANGE 

The ACCESSROUTINES were not handling a change in the audit block size made via DASDL UPDATE if 

the audit were on disk or pack. The audit could be corrupted as a result. The RECOVERY 

routines were not handling a change in the audit block size on an audit file switch,. These 
have been corrected. 

PB97B RECOVERY - DIE ON "DBST" IF "REBUILD" 

An abnormal termination no longer occurs on RECOVERY/< d a t a base name> when a DBST record is 
encountered in the audit when applying before images in the cases where that can legally occur 
(i.e., a reconstruct with a finalaudit specified). This error was extremely unlikely to occur. 

P8977 RECOVERY - POSITIONING THE AUDIT FOR RECONSTRUCT 

When positioning the audit at the beginning of DATARECOVERY or RECOVERY while attempting to 
recover using an on-line dump, a fault could occur. This could only happen in the unusual case 
where there were no control records in the starting audit file which were written after the 
dump was started. The problem has been corrected. 

P9017 RECOVERY - "NO FILE" "PARAMETERS" 

An error in initialization for REBUILD, ROLLBACK and RECONSTRUCT has been corrected which 
caused a "NO FILE" on the parameters file if that file were located on pack instead of disk. 

P9185 RECOVERY - ELIMINATION OF HOLES IN RESTART DATA SET 

The ACCESSROUTINES no longer use records in the restart data set as temporary storage for last 
good restart areas. This results in less processor and I/O overhead, eliminates a potential 
source of fatal I/O errors in RECOVERY, simplifies the DMSI I software, and can result in 
slightly less data being written to the audit trail. 

It is very likely that rebuild would fail at sequence number 60933000 in RECOVERY. This has 
been corrected. 

P925H RECOVERY - CORRECT POSSIBLE "INVALID INDEX" IN "RECOVERY" 

RECOVERY might have gotten an INVALID INDEX when processing audit records for ordered data 
sets. This has been corrected. 
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PI 025 REORG - PROGRAM EFFICIENCY 

Certain procedures in the REORGSYMBOL I C have been made more efficient. 

P1055 REORG - CORRECT ALLOCATION OF RESTART FILE 

REORGANIZATION wi I I no longer ignore the INTERNAL FILES specification with respect to its 
restart files. Formerly, REORGANIZATION always allocated this file on disk. 

P1063 REORG - "INVALID INDEX" REORGANIZING BIT VECTOR 

Reorganization of a bit vector no longer terminates with an INVALID INDEX. Formerly, this 
would occasionally occur due to a miscalculation of an internal array size. 

PI 697 REORG - PROCESS TIME ACCELERATION 

Local arrays used in i t e r a t i ve I y-c a I I e d procedures have been eliminated to reduce array 
allocation and deallocation time. 

P1698 REORG - INVALID CHECKSUM 

REORGANIZATION no longer generates an invalid checksum of block one of a disjoint ordered or 
unordered list. 

P8912 REORG - SORT ERROR #4 ON INTERNAL SORT 

REORGANIZATION will no longer terminate with a sort error #M- (disk limit specification 
exceeded) when sorting an internal file. 

P8917 REORG - DISCONTINUITY RECORD ON FIXED STRUCTURE 

REORGANIZATION now marks each structure which was "fixed" with an audit discontinuity. 
Formerly, only "generated" structures were marked. 

P8918 REORG - RESEQUENCE DOCUMENT SECTION 

The documentation section of DATABASE/REORGSYMBOL IC has been resequenced. 

P9083 REORG - REMOVE USE OF CERTAIN COMPILE TIME IDENTIFIERS 

All identifiers in the REORGSYMBOL IC using a peck mark followed by a node identifier have been 
changed to the peck mark number construct. 

P9093 REORG - INVALID REORGANIZATION OF EMPTY SET 

Reorganization of an empty disjoint set or subset no longer yields a new structure missing an 
"omega" entry. 

P9183 REORG - INVALID REORGANIZATION OF RANDOM EMPTY BLOCKS 

REORGANIZATION no longer terminates with an INVALID INDEX when the final reorganized structure 
contains two consecutive empty blocks in the basic scrambling area. 

P9255 REORG - "NORECORD" ERROR EMPTY UNORDERED DATA CHAIN 

If a master data set contained a valid address to an empty chain of unordered data set blocks 
to be reorganized, the REORGANIZATION would terminate with a NORECORD 5 error. 
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DMS II - UTILITY 



D2243 UTIL - SPECIFY "PACKNAME" 

The ability to specify PACKNAME has been added to the row selection criteria for the DUMP, COPY 
and RECOVER statements. By using PACKNAME in conjunction with FAMILYINDEX, it is now possible 
to limit UTILITY to a particular pack without having to enumerate the files that exist on that 
pack. 

When more than one selector is specified in the rowselection criteria, they are now separated 
by either "AND" or "8<", rather than separated by a comma. The old syntax will result in a 
syntax error. 

If more than one integer or range of integers (separated by commas) is given for the family 
index or row options, the conditions are OR'ed together. If any one of the ranges or integers 
are correct, the selector is satisfied. 

Examples: 

1. DUMP- ( FAMILY I NDEX=l,t AND PACKNAME=DBDATA) TO TAPEX 

All rows in the data base that reside on pack family DBDATA AND are on either familyindex 1 
OR 4 of that family will be dumped to TAPEX. 

2. DUMP (DB/A/=, DB/B/=, DB/RDS/= (PACKNAME=DBDATA) ) 
(PACKNAME=DBDATA&FAMILYINDEX=1) TO TAPEX 

All rows in files DB/A/= and DB/B/= which are on familyindex 1 of DBDATA will be dumped. 
The rows of DB/RDS/= will be dumped if they satisfy either the inner condition 
packname=DBDATA or the outer condition that packname is DBDATA and FAMILYINDEX=1 . Since the 
first condition is less restrictive, all the rows of DB/RDS/= on DBDATA will meet it and be 
dump ed . 

3. RECOVERtROWS USING BACKUP) = (ROWLOCK=READERROR, LOCKEDROW AND 
PACKNAME=DBDATA AND FAMILYINDEX=l-3,5> FROM TAPEX 

If there are 5 packs in the DBDATA family numbered 1-5, none of the rows on familyindex 4 
will be selected for reconstruction. All of the rows of familyindex 1,2,3 or 5 that either 
have a READERROR or are LOCKED OUT will be reconstructed. 

The DUMP syntax is as follows: 

<rowselector> 



l<- 

I 



AND — 

I I 
l<- & —I 



/1\- FAMILYINDEX — = — <range options>- 



) -- 



|-/1\- ROW - 

I 

|-/1\- PACKNAME 



— <range options>- 
= --<packname>- 



<range options> 



l<- 



-< i nt eger >- 



I - - — < i n I ege r >- I 



The RECOVER syntax is as follows: 

|< AND — 

I I I 

I l<- 8> —I 



( /1\- FAMILYINDEX — = — (range options> ) —I 

I I 

|-/1\- ROW 1 



l<- 



-/1\- ROWLOCK 



— /1\- LOCKEDROW — 
I I 

l-/l\- READERROR -I 
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-/1\- PACKNAME 



-< p ac k n ame >- 



D2H41 UTIL - MULTIPLE WORKER RECOVERY 



The ability to specify how many workers in parallel will be processing tapes on input has been 
added to UTILITY. This capability is available for UTILITY functions which use tapes as input: 
i.e., RECONSTRUCT, REBUILD, and COPY. The complete syntax follows: 



RECOVER Statement 



I I 

I- OPTIONS — <opt ion I ist>-| 



RECOVER --<recover s p e c i f i c a t i o n > > 



l<- 



> <fi lei ist>--<sourcel i s t >- 



<option list> 

| < 

I 
__ ( /lN _ NOZIP -- 

|-/1\- FLUSHDB 
-/1\- WORKERS 



-< i n t e ge r >- 



-< i n t e g e r >- 



I- MIN - 



<recover s p e c i f i c a t i o n > 

— ( — ROWS USING BACKUP 

ROWS IN PLACE USING BACKUP 

ROWS USING AUDIT ONLY — , --< limit >- 

ROLLBACK <poi nt> 

I 
REBUILD —I 



< I imi t> 
-- LIMIT 



<integer> CONTROL POINTS 

I I 

I- SYNC I 



- THRU AUDIT — <integer>- 
-<dala-t ime> 



<po i n t > 

THRU AUDIT — <integer>- 

I 



I- TO BOJ OF — <inlH> / <int 4> 

I I 

EOJ -I |-ON<date-time> 



GEQ <date-t ime>- 

I 
LEQ -I 
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I- . — <year i n t M- > - I 



MARK 3.0 



AT --<hrs int2>- 



> — < m i n i n 1 2 > - 



I - : --< sec in t2>- 



I I 

I- . — <fsec inl3>-| 
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< m o n t h > 

JAN, JANUARY, FEB, FEBRUARY, etc. 

< d a y ! n t2> 

DAY = Unsigned integer of not more than 2 digits. 
<year int L +> 

YEAR = Unsigned integer of not more than 4 digits. 
<hrs int2> 

HRS = Unsigned integer of not more than 2 digits. 
<m i n i n t2> 

MIN = Unsigned integer of not more than 2 digits. 
<sec in t2> 

SEC = Unsigned integer of not more than 2 digits. 
<fsec int3> 

FSEC = Unsigned integer of not more than 3 digits. 
<f i I e I i st> 



l<- 

I 



— ( <filelisl> ) 

I I 

I -< f i I ename> I 

I II I 

|-<rowselector>-| |-<destination>-| 



<rowselector> 



l<- 



-- ( 



ROW 



I 
I- FAMILYINDEX -I 



I 

-< i nleger> ) 

I 

I- - <integer> 



I- ROWLOCK — = — LOCKEDROW 



I 



READERROR 



<deslination> 

ONTO — <filename>- 



|-<on>- 



AS — < f i I e n ame >- 



I I I 

|-<on>-| I- TO — ( — <f ami I y index> — ) 



TO — ( — <f ami ly index> — ) 
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<familyindex> 
— FAMILYINDEX 



■< i n I e ge r >- 



RETAIN —| 



<sourcel ist> 



FROM 



l<- 



I 
> < t ap e n ame >- 



l<- 



VERSION — 



I 

I- CYCLE -■ 

I 

I- SERIALNO 



— < integer > 

-< i nteger> 

= < integer > 

I - " < s t r i n g > 



Restrictions: 

Certain forms of the RECOVER statement require both a <filelisl> and a <so ur c e I i s t > ; others do 
not. The following table indicates the requirements of the various forms of the RECOVER 
statement . 



Statement 



Fi I e I i st 



So ur c e I 1st 



RECOVERtROWS USING BACKUP) Required * Required 

RECOVERtROWS IN PLACE USING BACKUP) Required ** Required 

RECOVERtROWS USING AUDIT ONLY ) Not Permitted Not Permitted 

RECOVERtROLLBACK ) Not Permitted Not Permitted 

RECOVER (REBUILD ) Not Required »** Required 



* If "ONTO <filename>" or "AS <filename>" is used, the 
<filename> must not be the same as any data base file 
name in this or any other data base. 

** <des t i nat i on> is not permitted. 

*** "ONTO <filename>" and "AS <filename>" are not permitted. 

COPY Statement 



I 

I- OPTIONS — ( 



WORKERS — 



I 



COPY 



— < integer >-- ) - | 



l<- 



-<fi lei ist> — <sourcel i s t >- 



Examples: 



1. OPTIONS (NOZIP) RECOVERtROWS USING BACKUP) 
T 1 , T2 , T3 , Tt , T5 , T6 , T7 , T8 



FROM 



Since the example does not use the WORKERS=< i n t eg e r > construct, UTILITY will process each of 

the specified tapes serially, and process the cycles of each tape in parallel. In order to 

achieve a completely serial loading of the tapes, use the construct " WORKERS = 1 " in the 
RECOVER statement. 

2. OPTIONS (NOZ I P,W0RKERS=3) RECOVERtROWS USING BACKUP) = 
FROM T1,T2.T3,T4.T5,T6,T7,T8 
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Multiple Worker Dumps 

The parallel processing concept will also be available for a dump but in a different form than 
before. The semantics of the TAPES=N construct has been changed and the W0RKERS=N construct 
added . 

By using a multiple workers construct, the numbers of tapes dumped in parallel can be 
determined, independent of the number of cycles of a given tape. The ability to specify 
multiple dumplists and tapeids in one dump statement has been added so that multiple UTILITY 
dumps do not have to be run in order to logically partition the files to be dumped. 

DUMP Statement 

^ DUM p > 

I I 

I- OPTIONS — ( — WORKERS — = —(integer) — ) -I 



|< . 

I 
> <dumplisl> — TO — < t apeou tpu t >- 



< d ump I ist> 

|< 



I 

— <fi le specification) ■ 

I II I 

I- ( <dumplisl> ) I I -<r owse I ec t or >- I 



<rowse lector) 

|< AND 



I II I 

I l<- 8. —I I 

I I 

( /1\- FAMILYINDEX -- - --<range options) ) 

|-/1\- ROW — = — <range options) 1 

I * I 

l-/l\- PACKNAME — = --<packname> 1 



(range options) 



l< 

I 
< integer)- 



-< i n t e g e r >- I 



<tapeoutput> 

— <file specification)- 



| |< t | | 

II II 

I- ( /IS- TAPES — = — (integer) ) -I 

I " I 
|-<serialno> I 
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<ser ! a I no> 



|< , | 

I I 

SERIALNO <integer> 

I III 

I- ( <lnteger> ) -| I -< "s tr i ng" >- I 



Examp lea: 



1. DUMP = TO TAPEX (TAPES-3) 

The meaning of the TAPES-< i n t eger > construct will remain the same when not used in conjunction 
with the WORKERS construct. The TAPES construct indicates that the directory of rows to be 
dumped wll be divided into three parts, which will be dumped in parallel. In this example the 
tape ids will be TAPEX. CYCLE- 1 ; TAPEX, CYCLE=2 . and TAPEX, CYCLE-3. 

2. DUMP DB/A TO TAPE1 , DB/B TO TAPES, DB/C TO TAPE3 

In this example, the user is logically partitioning the files to be dumped into three parts 
rather than letting UTILITY do it. Each part will be assigned to a tape with a unique tapeid 
an dwi II have a completely different directory. 

3. 0PTI0NS(W0RKERS=3) DUMP = (FAMILYINDEX=1 ) TO Tl (TAPES-3), 

= (FAMILYINDEX = 2) TO T2(TAPES=3), = (FAMILYINDEX-3) TO 
T3(TAPES=3) 

In this example the user is dumping each unit of a pack family to a separate set of tapes. The 
rows on each pack will be divided up by UTILITY into three parts, which will be dumped to 
different cycles of the same tape name. We have a total of nine tapes which could be processed 
simultaneously, but the W0RKERS=3 will limit us to processing three tapes at a time. 

H. 0PTI0NS(W0RKERS=3) DUMP 

= ( FAMILY INDEX=1) TO Tl (TAPES-3, SERIALN0( 1 ) =100 , 1 01 , 

SERIALNO(2)=200,201 , SERI ALN0(3) -300 , 30 1 ) , 
= (FAMILYINDEX=2) TO T2(TAPES=3,SERIALNO( 1 ) = 1 10 , 1 1 1 , 

SERIALNO(2)=210,211 . SERI ALNO(3>=310 ,31 1 ) , 
= (FAMILYINDEX-3) TO T3(TAPES=3 ,SERIALNO( 1 ) = 120 , 121 , 

SERIALNO(2)=220.221 . SERIALNO (3) -320 ,321 ) 

This example is identical to the previous one except that the tapes have been assigned serial 
numbers. SERIALNO(l) means the first cycle of that tape name. The first reel of cycle 1 of Tl 
will be assigned serial number 100. If it overflows, the second reel (version 2) of cycle 1 
will be assigned number 101, etc. This syntax is not new, but is probably misunderstood. 

Operator Interfaces to UTILITY 

The number of workers specified in the input can be changed during the execution of UTILITY by 
entering an accept message telling it the new value for workers. The syntax for the message 
is: 

<m!xno> AX WORKERS = <integer> 

This can be entered even if the WORKERS construct was not used in the original input. The 
mixno given must correspond to the main UTILITY slack. 

Res tar t Request 

The ability to restart UTILITY after it has been DSed has been added. This capability is 
available for UTILITY dumps and RECOVERY runs that have begun processing tapes and are DSed 
either internally (due to fatal I/O errors) or by the operator. The restart request will cause 
UTILITY to start over on the tape that was being processed at the time of the DS , without 
having to reprocess any tapes that were completed. The input string to UTILITY is not scanned 
on a restart request, and can be left blank. The mix number of the UTILITY run to be restarted 
is passed to UTILITY via the taskvalue attribute, and is negated to distinguish it as being a 
restart mix number. The following illustrates a restart request: 

RUN UTILITY/TEST (" "); VALUE = -1025 

UTILITY restarts itself by using the HLDUMPINF0 file that it creates with the mix number as 
part of the title. If the file TEST/HLDUMPINFO/ 1 025 does not exist (has been removed), UTILITY 
will not restart. In addition each tape or dump worker that was active at the time of the DS 
created its own HLDUMPINFO file that must be present in order for the worker to restart where 
it left off. These files are identified by the mix number and a worker number; e.q., 
TEST/HLDUMPINFO/ 1025/01. 
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Continued Request 



It is now possible to specify a continued UTILITY request for REBUILD or RECONSTRUCT. If the 

original request did not load the complete set of files and/or rows due to I/O errors or user 

oversight in specifying the tapelist, a special continued request will allow the missing files 
and rows to be added before firing off RECOVERY. 

A taskvalue of 8 identifies a continued UTILITY request, and the input syntax is the same as a 
regular UTILITY request. The user must make sure to use the same type of REBUILD or RECONSTRUCT 
request, while changing the filelist and/or tapelist to add the necessary files. UTILITY will 
use the RECONSTRUCTINFO or REBUILDINFO file created by the previous UTILITY run, and simply add 
to it. This file must be present and be the correct one. 

For example, a user, in trying to do a REBUILD, forgot to specify one of the required tapes in 
the tapelist. Assuming that the database was dumped to four tapes; Tl , T2, T3 and T4-, the 
UTILITY input might be the following: 

RUN UTILITY/TEST ( "RECOVERcREBUILD THRU AUDIT 5) FROM T1.T2.T4 ") 

Since a REBUILD must load the entire database, UTILITY would notice that some of the files were 
not loaded and stop the REBUILD. Previously, the UTILITY REBUILD would have to be completely 
re-run, although most of the files were successfully loaded. But using the continued request, 
the user would just have to specify the missing tape in the tapelist and none of the other 
tapes would have to be reloaded; e.g., 

RUN UTILITY/TEST ("RECOVERcREBUILD THRU AUDIT 5) FROM T3 "); 
VALUE=8 

I/O Errors During Dump 

UTILITY will handle both hard I/O errors and timeouts that occur while writing to tape. 

Appropriate error messages that describe the type of error that has occurred are displayed. 

The tape on which the error occurred is labeled "BADTAPE" and closed. The following accept 
message is then displayed to the operator: 

AX "OK" FOR RETRY OR NEWTAPE 

At this point the operator can either enter an "AX OK" or DS the job. An "OK" will cause 
UTILITY to restart the dump at the same point where the badtape was started. At this point the 
operator can switch tapes, clean the tape that got the error, change tape drives, etc. 

Other UTILITY workers can proceed with their dumping while this worker is waiting for the 
accept message or waiting for the tape to be put up. 

I/O errors that occur while UTILITY is reading from disk are fatal. UTILITY cannot successfully 
complete a dump unless all the rows that are specified in the dumplist are dumped. The row 
that caused the error on disk must be reconstructed before it can be dumped. UTILITY will DS 
itself in this case, leaving its restart files around so that it can be restarted and continue 
dumping where it left off. 

I/O Errors During RECOVERY 

If UTILITY encounters hard I/O errors or timeouts while reading from tape, the appropriate 
error message is printed and the following is displayed to the operator: 

AX -RETRY' OR 'SKIP ROW OR 'QUIT TAPE' 

If the operator enters "RETRY", UTILITY will start over at the beginning of the tape, and 
attempt to read it again. "SKIP ROW" causes the row on the tape that got the I/O error to be 
passed over and not be included in the RECOVERY operation. If UTILITY skips a row in this 
manner, RECOVERY will not automatically be fired off so that the user can have the opportunity 
to load the missing row(s) via a UTILITY continued request before initiating RECOVERY. 

"QUIT TAPE" will cause the rest of the rows on the tape tand any subsequent reels) to be 

skipped. If there are other tapes in the tape list to recover from, UTILITY will proceed to 

load those tapes. As with the "SKIP" response, RECOVERY will not automatically be fired off so 
that the missing rows can be loaded from other tapes. 

D2<+82 UTIL - NO FILE ON "C0NTR0L0LD" 

Under certain circumstances, the control file was not being read off the tape used for 
recovery; consequently, UTILITY would get a NO FILE on CONTROLOLD. This has been corrected. 

D2"+97 UTIL - NEW METHOD OF DATA BASE INITIALIZATION 



CURRENT METHOD FOR INITIALIZATION 
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Currently, initialization of DMSII data base files is accomplished by the execution of an OPEN 
INITIALIZE statement in a host language program. This action may be performed at any time when 
no other activity on the same data base is occurring. The effect is to initialize all 
structures which were invoked. Since it is not possible to completely control the invocation 
of structures in a user program, there are a number of undesirable side effects to this 
procedure: 

1. Global data can only be avoided by using logical data bases which do not include it. It may 
be necessary to have some special logical data bases for just this purpose. 

2. The restart data set must be invoked in order to do any updates of an audited data base. 

3. Special handling in the accessrout i nes is required for the partition directory dataset which 
gets invoked along with any partitioned structure. 

t. Embedded structures can only be invoked by invoking their masters. 

In any of these cases, structures can be initialized accidentally or when it is not desired to 
do so (or when it is disastrous to do so). 

With the advent of the control file, it is possible to improve upon this situation. The 
control file serves as a central repository for data base state information and can be used as 
a data base lock. In both of these functions, it can help improve the initialization process. 

NEW METHOD FOR INITIALIZATION 

1. DATABASE/UTILITY has a new section which provides an initialization function. Run as a 
separate program from the accessrout i nes , it takes as input a string (possibly on card 
images) of the form 

"INITIALIZE <structure Iist>;" 

The (structure list> can be a list of structure names, separated by commas, or an equals 
sign (=), indicating the entire data base. (The equals sign now may also be used in LIST or 
WRITE commands to UTILITY when it is desired to print the entire data base. The former use 
of "ALL" for this print function is maintained.) 

UTILITY checks the list of structures for "consistency" and then create new "empty" files in 
their place. The control file file-state fields are adjusted to reflect the initialization 
(CFAUDINZ for audited data bases, CFFILENORMAL for unaudited). 

"Consistency" is defined as a list of structures which leaves no "dangling pointers"; i.e., 
set entries, roots, or links left pointing into the to-be-empty file. Only disjoint 
strjctures may be named, since embedded structures only would necessarily leave "dangling 
roots". Sets of, and embedded structures within, the named structures are included by 
default. Disjoint manual sets can be named, but not automatic ones if the data set is not 
also named. If structures with populations in global data are named, all such structures 
and global data must be named. Structures which are the object of counted links in a named 
structure must also be named. 

This function, like the current OPEN INITIALIZE, is an exclusive function on the data base 
and has a control file lock. It needs to complete before releasing the data base. It can 
be executed in several steps - doing different structures each time. It is also repeatable 
in case it is run incorrectly or it is interrupted (e.g., by a Halt/Load). 

2. DASDL has an option to prohibit OPEN INITIALIZE on a data base. The syntax for this option 
i s 

NO OPEN INITIALIZE 

Use of this option gives a data base administrator more control over the initialization of 
the data base. The initialization can only be done with UTILITY, a program more easily 
controlled by the d.b.a. than arbitrary h o s t- 1 ang uag e programs. An attempted OPEN 
INITIALIZE on a data base with this option set will result in a (DM) OPENERROR ^3 exception. 

3. For the present time, OPEN INITIALIZE will remain unchanged, for reasons of compatibility. 
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P1072 UTIL - FILE LISTED INSIDE PARENTHESES 

UTILITY was incorrectly parsing a dump list in which the files were listed inside parentheses 
and no fileselector list followed. This has been corrected. 

PI 210 UTIL - CORRECT BLOCKS I ZE FOR "CFOLD" 

The blocksize used for reading in the old control file from tape was inconsistent with the 
blocksize used by UTILITY. This has been corrected. 

P1211 UTIL - LABEL "BADTAPE" 

If UTILITY encounters an error when creating a tape, that tape should be labeled as "BADTAPE". 
This failed to occur if the error was encountered when verifying the tape (i.e., reading it). 
This has been corrected. 

P1212 UTIL - CORRECT ALLOCATION OF TAPES 

Previously, if a large number of tapes were specified and a very small number of rows were 
dumped, incorrect tape dumping could occur. UTILITY will now allocate tapes so at least one 
row Is included on each tape. This may cause the number of tapes used to be fewer than the 
number of tapes specified. 

PI 278 UTIL - RECOVERY USING "1 1. 8" DUMP TAPES 

The control file that is created by UTILITY when attempting to reconstruct or rebuild from a 
II. 8 dump tape was causing problems under certain conditions. These problems have been 
corrected. 

PI 355 UTIL - REMOVE FIRST READ ERROR MESSAGE 

The timestamp that told UTILITY when the first read error occurred had been de i mp I emen t ed ; 
however, the message was still being displayed. This has been corrected. 

P1356 UTIL - FAULT INITIALIZING LARGE NAME 

UTILITY no longer faults with a SEG ARRAY error when initializing structures from a data base 
when the data base name contains more than nine characters. 

P1581 UTIL - HALT/LOAD RESTART WITH MULTIPLE CYCLES 

UTILITY was failing to restart correctly following a Halt/Load if some of the cycle of a 
multiple cycle dump were already finished while others had not yet started. UTILITY has been 
corrected so that cycles that had not yet begun will start again at the beginning. 

PI 597 UTIL - TAPE KIND SET CORRECTLY FOR FILE ON PACK 

If a user does a UTILITY dump to a file on PACK, the KIND will now be set correctly so that a 
"REQUIRES DK DISK" message does not appear. 

PI 622 UTIL - ROW SELECTION WITH MULTIPLE OPTIONS 

In some cases UTILITY was not behaving correctly when multiple row selection options were 
given. This has been corrected. 

PI 629 UTIL - SYSTEM PARTITIONED FILES CAN BE DUMPED 

UTILITY was unable to dump partitioned file that had no usercode since GETSTATUS returns an 
asterisk as part of the filename name. The asterisk returned in this case will now be ignored. 

P1630 UTIL - FAULT IN "REALSWITCH" 

A problem in procedure REALSWITCH which caused a fatal error during a COPY has been corrected. 

The problem occurred because (1) OPENTAPE was not invoked to set up the proper variables and 

open the required tape file, and (2) SKIPBLOCKS was invoked with the wrong parameter causing a 
fatal error from ASSERT, 

P1635 UTIL - "PRINTIT" GIVES ERROR FOR BLOCK ARRAY OVERFLOW 

PRINTIT will now give an error if it is about to overflow its NOTAVAIL block array, rather than 
give an INVALID INDEX. The size of the array has been increased also. 
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P1699 UTIL - INITIALIZING STANDARD DATA SETS 



A problem has been corrected in INITIALIZING standard data sets which have less thin 
se gmen t s pe r are a . 



P8944 UTIL - NEW TAPE BLOCK DEFAULT SIZE 

The tape block size default value has been changed from 454 to 903 on III.O UTILITY. II. 9 
UTILITY will accept either block size on a dump tape, although it will continue to dump tapes 
with a block size of 454. 

P8985 UTIL - RECONSTRUCT ONTO "DB" FILES 

UTILITY will now check the file kind of the temporary files that RECONSTRUCT is using. If the 
filekind is DBDATA or DBRESTARTSET, UTILITY will issue an error and stop. This is to prevent 
the accidental use of an existing data base file as a temporary reconstruct file, thereby 
wiping out a data base file. This check will be made for reconstruct "ONTO" and "AS". The 
temporary files for a reconstruct "AS" will be given filekind DATA. 

P90I9 UTIL - RECONSTRUCT EMPTY FILE 

An empty direct data set can now be reconstructed without getting a syntax error. 

P9076 UTIL - NO RECONSTRUCTION ON ROW NOT DUMPED 

UTILITY was incorrectly initiating reconstruction on rows which were present at dump time but 
which were not dumped to the tape being used for reconstruction. This has been corrected. 

P9182 UTIL - NO FILE FOR DUMPS TO DISK 

UTILITY was locking the dump file only if KIND were PACK, so that dumps to disk were not saved. 
This has been corrected. 

P91B4 UTIL - NEW "III.O" FORMAT TAPE BLOCKS 

Due to a change in the format of a tape block that will be released on the III.O release, a 

modification was necessary to II. 9 so that it will be able to handle either the old or new 

format. The change involves the addition of two more control words at the beginning of each 
tape block. 

P9258 UTIL - "READERROR" SET FOR SELECTED ROWS 

UTILITY reconstruct was marking all the rows of a file to be reconstructed with a READERROR 
rather than only those rows which were actually to be selected for reconstruction. This has 
been corrected. 

P9278 UTIL - PROBLEMS WITH PARTITIONS 

Calls on the control file module to check time stamps were being done incorrectly for 
partitioned structures. Partitioned structures are now using a different set of control file 
procedures, passing the partition numbers and structure number. 

P9279 UTIL - PROBLEMS IN "RECONINFO" 

The procedure that creates the entires in the RECONINFO file was incorrectly handling a 
situation where it should delete an entry and insert a new one. This resulted in the 
possibility of having a blank record in the RECONINFO file, which will cause recovery to fail. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

DUMP ALL 

.« 

P9031 DUMPALL - SUPPRESS EXTRA LINES IN "LAN" LIST 

DUMPALL, using the LAN option, no longer prints two EBCDIC lines on continuation lines of 
records which are larger than 56 characters. 

P9113 DUMPALL - PACKNAME OPTION FOR FILE ROUTINE 

DUMPALL no longer terminates with an attribute error for the following input: 

FILE <fllename> PACK ■ <packname> 

P911H- DUMPALL - CORRECTLY PRINT VARIABLE RECORDS 

DUMPALL now blank fills after variable length records before printing them for the LIST and 
COPY routines. Variable length records of disk and pack files, which have FILETYPE=3, cannot 
be blank filled since the logical record size is not known. 

P9813 DUMPALL - CORRECT PACK HANDLING 

DUMPALL will no longer hang on "NO FILE" when attempting to list a non-present file, using the 
"PACK" option. 

P9214 DUMPALL - PROPAGATE SAVE FACTOR 

The save factor of DUMPALL 's input file is now carried over to the output file when 
appropriate. 

P9215 DUMPALL - REVISE TAPE HANDLING IN "DMPMT" 

The way in which tape files are handled for the DMPMT option has been changed. 

Record and block sizes are now determined from the file's header record, where possible, 
instead of being static. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
ESPOL 



PI 390 ESPOL - BIND INFO FOR DOUBLE PRECISION VARIABLES 
Correct bindinfo is now generated for double precision variables, 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
ESPOL INTRINSICS 



PI 156 ESPOLINTRN - "TAN" AND "COTAN" INTRINSICS 

The TAN and COTAN intrinsics will now return the maximum single precision value as an 
approximation for infinity when the argument is appropriate (for TAN, argument MOD PI=PI/2; for 
COTAN, argument MOD PI=0). Previously, this condition was not correctly recognized. 

PI 157 ESPOLINTRN - "DGAMMA" INTRINSIC 

An error termination is now obtained when a zero argument is passed to the DGAMMA intrinsic. 

P1362 ESPOLINTRN - "BASIC." MAKING ARRAYS PRESENT VIA "TOUCH" 

The EJAS IC intrinsics will make arrays present (when necessary) via the proper invocation of the 
TOUCH intrinsic. 

P1420 ESPOLINTRN - "ALGOL" OUTPUT ARRAY ELEMENT 

The problem of an ALGOL program causing a fault in the intrinsics when attempting to output an 
array element using a */ or *// format has been corrected. 

P1421 ESPOLINTRN - "BASIC," "SETW" IMPROVEMENTS 

The SETW statement of BASIC will now work correctly for the following cases: 

1. SETW <filenumber> TO x, where 80 < x <= 160. 

2. SETW <file number) TO x, where the length of the file (LFW) is not a multiple of 60 and 
LFW- (LFW MOD 80) < x <= LFW. 

P9115 ESPOLINTRN - "REPLACE FOR NUMERIC" CORRECTION 

The following statement in ALGOL was producing the resultant string of "1" right-justified in a 
field of <number> characters, when <expression> was a floating-point value with (number) 
significant digits to the left of the decimal point: 

REPLACE <pointer> BY (expression) FOR <number> NUMERIC 

The OUTPUTCONVERT intrinsic will now produce the correct resultant string in this case. 

P9116 ESPOLINTRN - "ATTRIBSEARCHER" CHECKING MNEMONICS FOR "PL I" 

The ATTRIBSEARCHER intrinsic will now properly recognize that run-lime errors converting a 
string mnemonic to a value for PL/ 1 programs are user errors and not compiler errors. 
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DOCUMENT CHANGES NOTES (D NOTES) 



FILECOPY 



D2225 FILECOPY - "EXCLUDE" SYNTAX CORRECTION 

The EXCLUDE syntax has b»en corrected to allow "*X" to compare equally with "X". 

D2258 FILECOPY - "NO FILE" ON "INCLUDE" STATEMENT 

FILECOPY will now display the non-existent file message to a NO-FILE response from GETSTATUS on 
a file title in an INCLUDE statement. This will cause the task to c on 1 1 nue and not be aborted . 
The error message "UNKNOWN GETSTATUS ERROR" has been changed to read "GETSTATUS ERROR NUMBER 
XXX". where XXX is the GETSTATUS run number. 

D2272 FILECOPY - SAVEFACTOR ZERO VS "FILECOPY" 

A new modifier SFACTORZERO has been added to FILECOPY. This modifier changes the way FILECOPY 
handles files with SAVEFACTORS of ZERO when the EXPIRED task option is used. If the modifier is 
not used, the zero savefactor is used to determine If the file meets the request criteria. If 
the modifier is used, the SAVECONSTANT value is used in place of the SAVEFACTOR. 

Syn t ax : 

— SFACTORZERO —I 



The minimum abbreviation is underlined in the above. 
D2H85 FILECOPY - "SYNTAX" MODIFIER 



A new modifier has been added to FILECOPY to aid 
causes the FILECOPY run to only do the input 
that the use of SYNTAX in a task of a multi-task 
after the input syntax checking is complete. 



in request checking 
syntaxing and nothin 
FILECOPY run wi I I 



The modifier, SYNTAX, 
g else. It should be noted 
cause all tasks to stop 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
FILECOPY 



PI 042 FILECOPY - "(<USERCODE>) =" SYNTAX ERROR 

FILECOPY will give a syntax error for the following input syntax: 

(<user code> ) = 

The following input syntax will work correctly: 

(<usercode>)= 

PI 289 FILECOPY - "FKINDS" ARRAY ELIMINATED 

The value array FKINDS has been replaced by the ATTRIBSEARCHER intrinsic; consequently, 
FILECOPY can now automatically handle new FILEKINDS. 

P1290 FILECOPY - "B6800" VS. "FILECOPY" HEADING 

FILECOPY will now properly display its report heading when run on a system with a 4— digit 
system identifier (B6800). 

PI 291 FILECOPY - LARGE "INCLUDE" AND "EXCLUDE LIST" 

FILECOPY will now handle large INCLUDE and EXCLUDE lists for a single family. When enough 

input had been read to cause the creation of the AUXFILE from the AUXBUF, the record locater 

for FAMILY INFO was not reset to the proper record. Also, most of the fields in the FAMILY 
INFO record and AUXWORD have been expanded to handle very large requests. 

PI 337 FILECOPY - CARD INPUT VS. "UNITS=1" 

FILECOPY will now give a syntax error when the INPUT CARD file has UNITS set to 1 (CHARACTERS). 
P1477 FILECOPY - LOOP ON INPUT 

A possible loop on scanning input data has been corrected. 

P1508 FILECOPY - MULTIPLE TASK EXECUTION 

FILECOPY will now handle multi-task requests without terminating with a SEG ARRAY error in 
RETURNATOKEN. 

P9000 FILECOPY - SUPERFLUOUS COMMA IN "WFL" DECK 

FILECOPY will now create correct WFL output decks when identical tasks are requested in the 
same run. 

P9001 FILECOPY - ADDED TASK EXCLUDE INDEX FILE 

The INDEX file will now be created and used correctly by FILECOPY when using the ADDED task 
request. All files in the index will be excluded (unless overridden by an INCLUDE statement). 

P9189 FILECOPY - EXPIRED TASK 

FILECOPY will now handle the expired task correctly when a file has a LASTACCESSDATE of a year 
older than run date. 

P9191 FILECOPY - "EXTRACTONEFILE" VS. "GETSTATUS" ARRAY 

FILECOPY will now handle the case when a continuation GETSTATUS call is requested by 

EXTRACTONEFILE procedure, and a complete file name and information have been set up (GOTAFILE = 

TRUE) from the previous array. Previously, this caused a file that met the requested criteria 
not to be copied. 

P9192 FILECOPY - SUMMARY OUTPUT REFORMAT 

The summary portion of the FILECOPY output has been reformatted to remove the possibility of 
SEG ARRAY errors . 

P9289 FILECOPY - SCANNER FIELD EXTENSIONS 

FILECOPY will now allow almost unlimited number of input records and tokens, as all scanner 
fields have been expanded to handle 65,000 entries. 
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P9290 FILECOPY - "AUXFILE" AND "AUXBUF" FIELD EXTENSIONS 

FILECOPY will no longer stop on a "NO FILE AUXFILE" when handling largar amounts of input. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
FILEDATA 



PI 185 FILEDATA - "LFILES CAT" 

FILEDATA now gives catalog information to the CANDE user when "LFILES:CAT" is entered. 
PI 186 FILEDATA - INPUT STRING >255 CHARACTERS 

FILEDATA can now handle input string greater than 255 characters. 
PI 339 FILEDATA - DETERMINE SYSTEM TYPE 

The system type in now used properly when printing headings. 

P139S FILEDATA - RUNNING ON "B6800" 

FILEDATA now recognizes machines types other than B6700; i.e., B6800. This information is used 
for headings on output. 

PI 659 FILEDATA - "TD830" VS. N0N-TD830 "ODT" 

The extra ETX character has been eliminated from systems which are using TD800 (TD804) , CONRAC 
as ODTs. The ETXs are required on TD830 ODTs by the terminals' internal firmware. 

FILEDATA has also been corrected; it must be used in conjunction with this change. 

The following hardware must be changed in some cases to cause the correct terminal type to be 
reported: 

86700 with SLC ODT controls: 

CONRAC The terminal ID block on the SLC needs a pin inserted in the "CON" location of 
each ODT. 

TD800 The terminal ID block on the SLC needs a pin inserted in the "9348" location of 
each ODT. 

TD830 The terminal ID block on the SLC needs a pin inserted in the "93H8" and "BIDS" 
location of each ODT . 

B6800 with SDC II ODT controls: 

TD830 These are the only ODTs connected to this control. They require no change for the 
use of these patches. 
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DOCUMENT CHANGES NOTES (D NOTES) 
FORTRAN 



D240H FORTRAN - LOWER BOUNDS FOR "FORTRAN" ARRAYS 

Lower bounds for arrays have been Implemented in FORTRAN, providing the ability to specify both 
lower and upper bounds for each dimension of an array. 

As a result of this implementation, some problems with the previous compiler have been 
corrected. Subscripts will now be printed correctly when an array with variable bounds is 
output using free-formatting and named output is requested (e.g., using a free -format 
designator of */). Some inconsistencies have been eliminated between the 0PT=0 and the OPT=l 
compilers in calculating linearized subscript values from subscripts or in calculating array 
sizes for I/O when variable bounds or individual subscript expressions are not of type integer, 
so OPT=0 and 0PT=1 will produce the same results. With the exception of these problem areas, 
existing FORTRAN programs will require no conversion and will produce the same results when 
compiled with the new compiler as they do when compiled with the previous compiler. 

The following changes should be made to the FORTRAN Manual to document this new implementation. 

1. To the list of "Basic FORTRAN Characters" for EBCDIC Input in Chapter 3, add the character 
" : " (colon). 

3 . In Chapter 5, replace the section on "Array Elements" by the following: 
ARRAY ELEMENTS 

FORTRAN variables may be divided into simple variables, which are denoted by a variable name 
only, and array elements. An array element is a member of a data structure called an array. 

An array is an ordered set of data organized into dimensions. An array is referenced by an 

array name which is of the same form as a variable name. A variable name is designated as an 

array name by its appearance in an array declarator (see Chapter 7). All of the elements of an 

array are of the same type, and this type is indicated by the array name in the same manner as 
for variable names. 

Each member of an array is an array element. The proper format for an array element is: 



a(s) I 

I 



i where a is an array name, I 

! (s) is the subscript, | 

I and s is a list of subscript 

I expressions separated by commas. I 



I 



The number of subscript expressions must be equal to the number of dimensions in the array 
declarator for the array except in an EQUIVALENCE statement (see Chapter 7). 

A subscript expression is an integer, real or double precision expression. Subscript 
expressions which are not integer will be truncated to an integer value (see Chapter 11). 

An array name may appear without a subscript in: 

a. The dummy argument list of a subprogram. 

b. The actual argument list of a subprogram reference. 

c . An I/O I ist . 

d. A COMMON, EQUIVALENCE, DATA or type statement. 

e. A READ, WRITE, PRINT or PUNCH statement as the format designator. 

f. A READ or WRITE statement as the file designator. 

g. A NAMELIST statement. 

h. A DEBUG MONITOR or DEBUG DUMP statement. 

Under certain circumstances, the subscript value of a subscript in an array element may fall 

outside the range declared for the array. The rule is: Any subscript for an array is allowed 

which references an element of a COMMON block containing the array or an element of an array 

EQUIVALENCE ' d to the array or an element of an array associated with the array through argument 
passing. 

Example: 

COMMON /X/ Ac 10) ,Q,B(19) 
COMMON T,C(10) 
DIMENSION D(10) 
EQUIVALENCE (C(8) ,D(3)) 
CALL S(A(5)) 
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END 

SUBROUTINE SCF) 

COMMON /X/ R,E(9) 

DIMENSION F(99) 

RETURN 

END 



Array Name 



Al lowableSubscripts 



A 
B 

C 
D 
E 
F 



1 to 30 

-10 to 19 

to 15 

-5 to 10 

to 29 

-3 to 86 



The following ere examples of valid array elements; 



B(I) 

AMK 599(6) 

ZIPWITH(3) 



( interpreted 19 AMK599(6> ) 

(interpreted as ZIPWIT(3) when used 

where an array element may appear) 
15(15(3)) 
ARRAY2(2.2,3) 
A(R*T) 

Q(3.7) (interpreted as Q(3)) 

INT(1+9*SIN(I*PI10)) 

The following are examples of invalid array elements: 

1(1) (an array name is not an arithmetic expression) 

3ARRAY(3) (invalid array name) 

The internal handling of arrays is discussed in Chapter 11. 

3. In Chapter 7, replace the section title "Array Declarators" by the following: 

ARRAY DECLARATORS 

An array declarator declares the size and number of dimensions of an array. 

The proper format for an array declarator is: 



a(d) 



I where a is an array name ! 
I and d is a list of dimension I 
I declarators separated by commas. ! 



The number of dimensions in the array is the number of dimension declarators 
declarator. The minimum number of dimensions is one and the maximum is 31. 

The proper format for a dimension declarator is: 



the array 




where dl is the lower dimension bound 
and i'd is the upper dimension bound. 



The lower and upper dimension bounds are real or integer constants or simple variables. 

The value of a dimension bound may be positive, negative or zero; however, the value of the 
upper dimension bound must be greater than or equal to the value of the lower dimension bound. 
If only the upper dimension bound is specified, the value of the lower dimension bound is one. 
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An array declarator must precede the first use 
EQUIVALENCE statement. 



of that array 
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an executable, DATA or 



Each array declarator is either a constant array declarator or a variable array dec I ara tor . A 
constant array declarator is an array declarator in which each of the dimension bounds is a 
constant. A variable array declarator is an array declarator in which one or more of the 
dimension bounds are simple variables. Those bounds that are variables are called variable 
bounds. Variable bounds must be either declared in COMMON statements preceding the array 
declarator or be dummy arguments. 

In addition, each array declarator is either an actual array declarator or a dummy array 

declarator. An actual array declarator is an array declarator in which the array name is not a 
dummy argument. An actual array declarator must be a constant array declarator and is 

permitted in DIMENSION statements, COMMON statements and type statements. A dummy array 

dec arator is an array declarator in which the array name is a dummy argument. A dummy array 

declarator may be either a constant array declarator or a variable array declarator. A dummy 

array declarator is permitted in DIMENSION statements and type statements, and may appear only 
in function or subroutine subprograms. 

The size of a dimension is the value d2-d 1+1 , where dl and d2 are the dimension bounds for that 
dimension. The size of an array is equal to the number ,o f elements In the array and is equal 
to the product of the sizes of the dimensions specified by the array declarator for that array 
The size of an array must not exceed 65,535 elements. 

Dimension bounds which are not integer are truncated to an integer value before being used to 
calculate the size of a dimension or the subscript value of a subscript. 

Examples: 

The array AR declared by 

DIMENSION AR(3.78:7.21) 
has 5 elements: AR (3) , AR (^ ) , AR (5) . AR (6) and AR(7). 
The array R declared by 

DIMENSION R(X,Y> 
where X=2.8 and Y=3.7 has 6 elements: R( 1 . 1 ) ,R(2, 1 ) ,R( 1 ,2) , R(2 ,2) ,R( 1 ,3) and R(2,3). 
H. In Chapter 7, replace the section on the EQUIVALENCE statement with the following: 
EQUIVALENCE STATEMENT 

The nonexecutable EQUIVALENCE statement causes two or more variables or arrays referenced in a 
program unit to share the same memory locations. 

The proper format for the EQUIVALENCE statement is: 




where h is a list of 2 or more 

simple variables, array names or 

subscripted array names separated by 

commas , 

and the ellipsis indicates as many 

repetitions of (k) as desired, each 

preceded by a comma. 



n an 
the 



No dummy argument may appear in an EQUIVALENCE statement. The items appearing in the list k 
will share some or all of the same storage locations. The subscript expressions of subscripted 
array names must be integer constants. The number of subscript expressions must be either 
ZWnuJZunr* " umber ° f dimensions for the array or be one. When a subscripted array name 
tUUlVALtNLt statement has as many subscript expressions as the array has dimensions, 
subscripted array name denotes an array element. 

Examp I e : 

If the array A Is declared by 

DIMENSION A(-5:5) 
the statement 

EQUIVALENCE (A(2),X) 
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equivalences X and the 8th element of array A, which is A(2). 

When the name of a multidimensional array appears in an EQUIVALENCE statement subscripted by 
only one subscript expression, that subscript expression denotes the linearized subscript value 
of the array element being eq u i v a I e n c e d . 

Example: 

If the array A is declared by 

DIMENSION A(0:5,-5:-l) 
the statement 

EQUIVALENCE <A(2),X) 

equivalences X and the second element of the linearized form of array A, which is A(l,-5). 
(See the discussion of how arrays are stored internally. Chapter 11.) 

An array name without a subscript denotes the first element of that array. 

When two or more subscripted or un s u b s c r i p I ed array names appear in the same list k, the 
equivalenced arrays are to overlap and be aligned in such a manner that the indicated elements 
share storage locations. No list may specify more than one element of the same array. 

The EQUIVALENCE statement may be used to associate elements with a COMMON block. This 
association may extend the COMMON block beyond its former terminal point, thus increasing the 
size of the COMMON block. Such an association may not extend a COMMON block backwards to 
locations preceding its initial point. Two elements of COMMON storage may not be made 
equivalent to one another, either directly or indirectly, by an EQUIVALENCE statement. 

An EQUIVALENCE statement must precede any executable statement employing items equivalenced. 

Storage considerations are discussed in Chapter 11. 

Examples: 

EQUIVALENCECA.B.C) , (A(3) ,R<9) ,G) 
EQUIVALENCE(D.E) 

5. In Chapter 11, replace the section title "Arrays" by the following: 
ARRAYS 

FORTRAN arrays are provided to allow the user to organize program storage locations into a 
convenient structure. Internally, an array is stored as a group of one or more contiguous data 
words. 

A FORTRAN array of any number of declared dimensions is represented internally by a 
one-dimensional array of storage locations. Each element of an array has storage requirements 
and partitioning identical to that of a simple variable of the same type as the array. Thus, 
each element of an integer array requires one word of storage partitioned like an integer 
simple variable and each element of a complex array requires two words of storage partitioned 
like a complex simple variable. 

Each integer, real and logical array is allocated as many words of storage as there are 
elements in the array. Each double precision and complex array is allocated twice as many 
words of storage as there are elements in the array. 

The elements of an array are ordered into a sequence. A subscript of an array element has a 
subscript value which determines which element of the sequence is identified by the array 
element. The first element has a subscript value of 1. 

Example: 

If an array is- declared by the array declarator 

A(L1:U1 ,L2:U2,L3:U3 Ln:Un) 

the subscript value for array element 

A(S1,S2,S3 Sn) 

would be 

1 + (Sl-Ll) 

+ D1MS2-L2) 

+ D1*D2*(S3-L3) 

+ ... 

+ D1*D2*D3* ... «D(n-l)*(Sn-Ln) 
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where 



Dk is the size of the kth dimension, equal to Uk-Lk+1, 

where Uk and Lk are truncated to integers 
n is the number of dimensions 
Sk is the kth subscript expression, which is truncated 

to an integer 

The offset of in array e I erne n t w i t h i n the sequence is its position in the sequence relative to 

Th! nlfllt J !h' n J: i ? i 9, J ° f a " arr ? y element is ••»"•! I" Its subscript value minus 1. 
Ihe offset of the first element of an array is zero. 

Subscript expressions are truncated to an integer value before being used to calculate the 

subscript value. 

Example: 

For an array declared 

DIMENSION A(0:5, 1 :4) 

the subscript value for A(3.73,2.79) and A(3,2) would be the same: 

=l+(3-0)+6*(2-l) 

=1+3+6 

= 10 

The ordering of the array elements produced by the subscript value is identical to that 
obtained by listing >ll o( the array elements by varying the first subscript expression most 
rapidly, the second subscript expressions next most rapidly, etc. 

Example: 

For the array A declared by 

DIMENSION A(0:2,l:2,-2:-l) 

the elements are stored in the following order: 

AC0.1 ,-2) 
ACl.1,-2) 
A(2, 1 ,-2) 
A(0,2,-2) 
A(l ,2,-2) 
AC2.2.-2) 
ACQ, 1 ,-1 ) 
A(l,l,-1) 
A(2,l,-1) 
ACO.2,-1) 
At 1 ,2,-1 ) 
A(2,2,-l) 

Element AtO, 1,-2) corresponds to the first element of the internal array. This order is the 

FnillVAl FWrr l i a ^ ay e ! eme ?J S are "•>»'«•'■•«« *h»n a multidimensional array is used in an 

tUUlVALtNLL statement or when the name of a multidimensional array appears in an I/O list DATA 

NAMFl' T^T*' , a T m - nt '''V COMMON statement, as a format designator, as a f Me esig a r n 
NAMELIST output, in a DEBUG MONITOR statement or in a DEBUG DUMP statement. 

An array is stored internally in consecutive storage locations as long as the storage 
requirement of the array does not exceed 4095 words. Arrays exceeding this size will be 
segmented for overlay purposes unless the compiler option LONG is set (see Chapter 19) Each 
segment will contain a maximum of 256 words and will automatically be overlayed and recalled as 
necessary during execution of the program. In no case may an array exceed 65,535 elements in 

I 8 n Q t ft a 

6. To Chapter 12 in the section on free-format output, add the following lines after the 
explanation of the use of the asterisk: M "iter int 

Named output cannot correctly handle subscript expressions whose magnitude contains more than 7 
decimal dig.ts. The compiler will give a warning if such subscripts can be detected at compile 
time. The subscripts printed may be incorrect. K 

D2H03 FORTRAN - WARNINGS ON USE OF "BCL" CONSTRUCTS 

nl!!i! CL . tS «rS?r S "'J! "° W 'A"?" f »»"™ in 9 to be emitted indicating that the program is not 
portable to EBCDIC mac h i nes . Only the first occurrence of BCL constructs in a program or (in 
the case of s epar a t e y-comp , I ed program units) program unit will cause a warning to be emitted. 
A warning message will also appear in the trailer information at the end of the listing 
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D2HH6 FORTRAN - "VECTORMODEISALLOWED" DE I IMPLEMENTED 

The compiler generation option VECTORMODEISALLOWED has been d e i mp I erne n t e d . The compiler now 
has the capability of generating vector mode code by default. It is no longer necessary to 
compi e the FORTRAN* c omp i li I r with VECTORMODEISALLOWED set to be able t o .« »c t or mode code; 
however, the FORTRAN program must still set the compiler option VECTORMODE to get vector mode 
code. 
D2501 FORTRAN - INSTALLATION INTRINSICS IN "FORTRAN" 
It is now possible to write installation intrinsics in FORTRAN. 

The compiler option INTRINSICS has been implemented. This option must be set before the "rsl 
source statement of the compile deck and cannot be set in batch mode. Se t t i n g INTRINSICS sets 
the option SEPARATE, and the subroutines or functions being compiled can be bound into the 
intrinsics file after compilation. The option LIBRARY may be set explicitly if desired. 

An intrinsic must be a subroutine or function subprogram. The compiler options OWN OWNARRAYS 
and LEVEL cannot be set in an intrinsic. The following items cannot appear in an intrinsic: 

a a STATISTICS or DUMP STATISTICS statement 

b. a STOP or CALL EXIT statement 

c. a DATA statement or an initial value list 

d. a COMMON statement 

e. an EXTERNAL statement 

f. an ENTRY statement 

g. formal subprograms 

I \WkY^\^l^: n l0CK. PURGE, CLOSE, FIND, BACKSPACE, 

ENDFILE or REWIND statement 
U . a READ or WRITE statement not specifying core-to-core 1/U 
I. a free-format designator containing an asterisk (*) 

D2532 FORTRAN - COMPILER FILE LINE 

Table 18-1 of the FORTRAN Manual (Form 5000H58) should be corrected. The COMMENTS for file 
LINE should say: 

"Optional and I ab e I -e q u a t ab I e to REMOTE file produced 
when either the compiler option LIST or TIME is set." 

D2573 FORTRAN - EXPONENTIATION MEANING 

The following should be added to the FORTRAN Reference Manual, Form No. 5001506, after page 

6-2: 

The meaning of exponentiation (**) depends on the values of the operands. The various meanings 

of Y**Z are as follows: 
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1 Z-TYPE | Z-TYPE | 


1 INTEGER | REAL or DOUBLE | 


I Value I Z>0 I Z=0 I Z<0 I Z>0 1 Z=0 1 Z<0 I 


1 Y>0 1 N °te 11 1 1 Note 2 I Note 3 I 1 | Note 3 | 


| Y<0 1 Note 1| 1 | Note 2 | Note HI 1 | Note 4 1 


J Y=0 1 j Note 4 | Note 4 | | Note 4 | Note 4 | 


1 Note 1: Y**Z=Y*Y*Y. . . *Y (Z limes) | 
1 Note 2: Y**Z=the reciprocal of Y»Y*Y . . * Y ( ABS (Z) t i me s ) j 
1 Note 3: Y**Z=EXP(Z*ALOG(Y) ) j 
1 Note 4: Value of expression is undefined | 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
FORTRAN 

PI 365 FORTRAN - "INVALID OP" IN "CHANGE" , "OPEN" , "INQUIRE" 

An INVALID OP error, which occurred at run time when a formal array was used U contain or 
receive a pol n 1 . r-v a I u e d attribute such as TITLE in a CHANGE, OPEN or INQUIRE statement, has 
been corrected. 
P1367 FORTRAN - CORRECTION TO " VECTORMODEISALLOWED" REMOVAL 

A syntax error no longer occurs if the FORTRAN compiler is compiled with the compiler 
generation option OPTLSS1 set. 

P1494 FORTRAN - FORMAL ARRAY IN IMPLIED "DO" LOOP 

An INVALID INDEX would occur when an attempt was made to initialize a formal parameter using an 
implied DO loop in a DATA statement if the formal parameter was not dimensioned. 

Formal parameters cannot be initialized in DATA statements; this error will now be flagged 
correctly. 

PI 506 FORTRAN - UNEXPECTED END OF INITIAL VALUE LIST 

The compiler would get an INVALID INDEX when the end of an initial value list occurred 
unexpectedly; e.g., REAL A ( 1 ) / 1 , £ , 3 . This has been corrected. 

PI 541 FORTRAN - FORMALS AS " IMPLIED-DO-VARI ABLE" 

When a formal parameter was used as an i mp I i e d-DO-v ar i ab I e in a DATA statement. the compiler 
would gel into an unending loop. This problem has been corrected. The use of a formal 
parameter in this manner will not affect the value of the parameter during execution. 

PI 542 FORTRAN - SOURCE PROGRAMS IN "BCD" CODE 

FORTRAN source programs with dollar option BCD set were being interpreted as BCL instead of 
BCD. This problem has been corrected. 

P1543 FORTRAN - SYNTAX FOR "DO" STATEMENT 

Certain incorrect delimiters were being accepted in place of a comma be tween the initial 
terminal parameters in the DO statement. The correct syntax error will now be emitted. 

P9068 FORTRAN - "OPT=l" READLOCK CODE 

The optimizing compiler would produce incorrect code for sequences of statements such as 
following, where "R" is an array: 

TB=2.*R(II) 
RC 1 1 )=R( I ) 

R(D=TB 



and 



the 



The code produced would in effect perform the last assignment before tne seconu-t o . < , 
causing incorrect results when I NEQ II. The optimizing compiler has been corrected to emit 
the correct code in these situations. 



the last assignment before the second-to- I ast , 
I . 

P9292 FORTRAN - "$" OPTION "LEVEL=N," N>15 

An attempt to set the lex level of a program or program unit to a va I ue great er than 15 through 
the use of the LEVEL compiler option will result in a warning message LEX LEVELb > ID WILL Bt 
DE IMPLEMENTED". 

P9293 FORTRAN - "$ INCLUDE" OF A NULL RANGE 

If a $ INCLUDE card with an internal file name specified a line range which '""fained no 
records, a subsequent SINCLUDE card on the same in ernal f , le name spec , f y ing a line range 
preceding the original range would cause no records to be included. This problem has been 
corrected; now, records within the second line range will be included. 

P9294 FORTRAN - IMPROVEMENTS TO TRAILER INFORMATION 

Improvements have been made to the trailer i nf ormat i on pr i n t ed at the end of a {'■*'?■: JJ' 
last line of trailer information has been broken up into two lines, the first line giving the 
code file title and the second line giving information about the compiler. 
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P9295 FORTRAN - "INVALID INDEX" ON OVERSIZED COMMON BLOCK 

An INVALID INDEX which would occur in Ihe compiler under certain circumstances in OPT=0 when a 

""m.S'th! p"Z,.:r" tha " B5535 ^'—^ '-9 has been corrected. The f o I I ow i n 9 examp , e 

COMMON Cell) ,Q(t32000) ,OT<2700) 
EQUIVALENCE (Ctll) ,TAUH) 
DATA TAUH/3./ 
END 

P9296 FORTRAN - USE OF "EXIT" AS A SUBROUTINE 

IH? °hlr° C °1 P ''\°a Wa9 iJ r, nii\ n9 ir5TT"! ? n a f ubr ° ul,ne named EXIT * Ith P«ra.ettrs which had not 
yet been compiled as the CALL EXIT statement. Now, such a statement will be treated as a call 

on a subroulme named EXIT. 
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DOCUMENT CHANGES NOTES (D NOTES) 
INPUT-OUTPUT 

D2287 IN-OUTPUT - "I/O" SUBSYSTEM IMPROVEMENTS 

Improvements have been made to the I/O Subsystem: 

1. File Open errors now show a character siring describing the error instead of returning just 
an error number. 

2 An FA response to a File Requires message that changes the KIND to DISK, PACK or REMOTE now 
will vork instead of remaining in a File Requires <new k i n d > slate. 

Qgifgg IN-OUTPUT - BACKUP FILE FEATURES 

Four features have been added to the format of backup files. Each change is upward compatible 
and ^ii no t affect programs reading backup files in a correct manner. Autoprml and 
SYSTEM/BACKUP have not been changed. 

The features are as follows: 

1 Word r 1 3 . 1 3 : 1 3 of the header record entry will contain a one if the file is a backup disk 
fMe ■ the labeltype of the file is STANDARD and the label entries are not present <lh,s can 
occur when the PR INTERLABELS SPO option is reset). 

£. The usercode, chargecode and task name in the header record entry will no longer be 
truncated. 

3 Word P98 of each block will contain the number of records in each block. Word 299 of each 
block will contain the record number of the first record in each block. 

Printer/punch label entries and the header record entry are not included in the record 
counts. Each space 2 entry counts as 2 records. All other entries count as one record. 

4 Word 9 of the header record is now defined to hold the level number of the backup file. All 
backup files created prior to these additions will have a zero in this word. This word nil 
now contain the current backup level of one to indicate the presence of these additions. 

D251B IN-OUTPUT - "BCL" BACKUP FILES 

As an aid in making backup files portable to EBCDIC machines, all BCL backup files will now be 
translated by logical 1/0's software translation to EBCDIC as they are being created. The 
change should be transparent when the files ultimately are punched or printed. 

On III.O, printer or punch backup files that explicitly set EXTMODE=BCL will be excepted from 
the conversion to EBCDIC. 

On III.l, only those printer or punch backup files that explicitly set EXTMODE=BCL and go to a 
backup 7-track tape will be excepted from the conversion. 

On III. 2, there will be no exceptions. 
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P1325 IN-OUTPUT - "FILETYPE=B RECORDCOUNT" 

r»r n ri L ^II^,S q ^' -J? * ' " l°J ' c * [ I/( ? | " * r- i n s I c s Incremented the RECORDCOUNT before finding the 
record instead of after .This caused the Input reelswilch logic to see a record count mismatch 
when reelswitchmg tape files. This has been corrected. m.smatch 

P1335 IN-OUTPUT - "FILETYPE=4" RANDOM "I/O" 

Random I/O to a FILETYPE equal to four file would fail with data error* if * h . f • i . 
character mode and the attribute SIZEMODE equaled SINGLE . Th i s has been clr r el t ei ' ' ' " "" 

P1382 IN-OUTPUT - "CARRI AGECONTROL=CTLASA" OR "CTL360" 

Ih! P ffIc? nd ,K° RTR i N cha J acte [-<"-'«"ted printer files have their carriage control embedded in 
the f rst character of each record. When records in this format are used with the i. 
control or record number) syntax of ALGOL or COBOL (e.g., WRITE(F[SKIP 132 A)-) the 
thTrecIrd ?."„..„ ■WlllY.' ^"^ "" " C ° nlr °' " '•""•' '"- ^ - for ma t I on emoted ' iS 

C£?Tr?r?c£irr-ii, ? ![ Ue f latement were used for control only (e.g.. WRITE(F)- or 
has been c£r reeled! ^ W ° U ' d '" ' 5E ° ARRAY inlerru P l f.ull In Ih.'l/O ro^{ !„..!' Thts 

P1410 IN-OUTPUT - STATUS CHANGE VS. "RSVP" REPLIES 
»!.!l!!^'" "'" "° W be m ° re res P° nsive l0 operator replies to NO FILE system output RSVP 

111 H 3 3 3 Q e S . ■ 

P1574 IN-OUTPUT - "LEB" RESIZE MISSED BY "OUTPUTREELSWITCH" 
The process of switching reels of an output tape file could get a fault in DO code if the 
e , ??:?na'ted: e9P0nded '" "' FILE REQu5[rES * SVP ■'" •" FA response . This prol tern !s no! 

P9273 IN-OUTPUT - "PROGRAMDUMP, " NEW "IOCB" 

Io?ds U !n U thriOCB. fMe S * Cti0n ° f PR0GRAMDUMP has bee " edified to correctly identify the new 

Tape labels now contain four-digit system serial numbers. The USYSID field in the HDR2 EOFP 
l.b.l no,_ begins at character number 45 (starting at character one . The o d three-digit 
field, beginning at character 37, will contain the lower three digits of the system serial 
number until the III.l release, at which time the three-digit field will chance to b t, Th. 
tape level value (characters 35 and 36 of th. VOL1 label) have been changed to 3 blanks - The 

P9274 IN-OUTPUT - "CLOSE HERE" ON EMPTY TAPE FILE 

A COBOL CLOSE HERE statement executed upon an empty tape file will no longer either cause a 
block count error or an incorrect number of records being written on the tip.. 
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D2425 IXREF - "XREF" PROCEDURE END SEQUENCE NUMBERS 

The Interactive Xref program will now list the ending sequence number as well as the starling 
sequene number for ALGOL and ESPOL procedures wherever it had listed the starting sequence 
number previously. A p r o c e d ur e may a I s o b e listed through Interactive Xref by usmg the 
following syntax: 



-- LIST —(procedure id> — 



D2525 IXREF - ADD "PRINTER" OPTION FOR "HELP" COMMAND 

The HELP command now recognizes PRINTER as a valid option. The PRINTER option functions in the 
same manner as it does when used with other commands. 

Examp I e : 

HELP: PR INTER 
D2526 IXREF - CHANGE " INTERACT I VEXREF" FILE TITLES 
The format of the titles of the files generated for INTERACT I VEXREF has been changed to the 
following: 

<usercode>XREFFILES/<codef i le I i t I e>/DECS 
<usercode>XREFFILES/<codef i le tit le>/REFS 

D2527 IXREF - VERSIONS FOR " INTERACT I VEXREF" FILES 

Version information is now included in the XREFFILES. INTERACT I VEXREF checks the compal i b i . i I y 
of the XREFFILES and displays an appropriate error message if the XREFFILLb were created witn 
an incompatible XREFANALYZER. 
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P1H30 IXREF - MODIFY OUTPUT FORMAT 

lNfERACTIVFyRFF t !^,nl,J! r i aIn K SCreen l UrmInal \: MI n ° lon 9 er cause lhe output' for..* used by 
UN i tKfll. I l VLAKLh to create a subsequent user problem. 

P1H31 IXREF - CORRECTLY EXPAND DEFINES 
Define text will no* be correctly recognized if It follows a quoted string and is on the same 
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03486 JOBFORMAT - "PE9MT" VS. "PETAPE" 



PE9MT in JOBFORMATTER 
with other sof tware . 



s UNITMNEMONICS array has been changed to PETAPE to 
This change will affect JOBFORMATTER output, LOGGER 



make it consistent 
and LOGANALYZER. 
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P1293 JOBFORMAT - SWAPJOB NUMBER AND JOB NAME 

The position of job name and job number have been exchanged on the banner page of WFL output. 

P1294 JOBFORMAT - COSMETIC CHANGES 

Several cosmetic flaws in LOGANALYZER output for IOERRORs and MAINT requests have been 
corrected. 

PI 422 JOBFORMAT - CHECKBIT RESULT MAPPING 

The checkbit field of interrupt parameter P3 on the BB800 is now displayed after mapping into a 
bilnumber. 

PI 475 JOBFORMAT - JOB LOG "I/O" ERRORS 

JOBFORMATTER will now stop printing the job file when an I/O error occurs while reading from 
t h e j o b I o g . 
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LCOBOL 

D2417 LCOBOL - "FILEKIND" FOR "LCOBOL" SYMBOL, CODE FILES 

If a new LCOBOL source file is created using the $NEWD option, the FILEKIND will equal 
"LCOBOLSYMBOL" . The codefile created by the compiler will have FILEKIND equal "LCOBOLSL3C0DE" 
or "LC0B0LSL5C0DE" , depending on whether SL3 or SL5 is desired. 
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LCOBOL 

P1368 LCOBOL - CORRECT BAD LITERALS, "OPTIM" 

The LCOBOL compiler will now process literals correctly. 

The OPTIMIZE dollar option now works correctly. 
P1593 LCOBOL - PATCHING "LCOBOL" SOURCE PROGRAMS 

The LCOBOL compiler was not patching some programs correctly. This has been corrected. 

P16Q8 LCOBOL - NUMBER OF CHARACTERS IN A GROUP MOVE 

In some cases the number of characters moved for a group move was incorrect. This has been 
corrected. 
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LOADER 

PI 3"+ 3 LOADER - CHANGE PANEL, "SPO" DISPLAY 

The processor panel display has been changed to show the correct LOADER level. The SPO BOJ 
message has been changed to indicate the appropriate machine (e.g., B6700 , 86800 ) . 

P1455 LOADER - DISK PACK "I/O" ERRORS 

The LOADER will now recognize I/O errors on disk packs/ 
P14-B0 LOADER - CORRECT "EOJ" MESSAGE 

The EOJ message will now indicate B6800/B6700 as appropriate. 

P1551 LOADER - "LOADER" VS. MULTIPROCESSOR 

The problem that was causing a multiprocessor system to superhalt after issuing the LOADER EOJ 
message has been corrected. 
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D2551 LOGANALY - "B6800 CPUERROR" 

A new option CPUERRORS, which applies only to the B6B00, has been added to LOGANALYZER. It 
produces a chronologically analyzed list of all system error interrupts. The following are the 
interrupts that are logged: 

Alarm 

General control 

Hardware 

For a complete description of t h e i n t e r r u p t s , refer to the B6B00 System Reference Manual (Form 
No. 5001E90), Section 5 - System Concept. 

Note: The error interrupts will also appear for a "LOG MAINT" request. 

D2561 LOGANALY - "PROCESSOR ID" 

LOGANALYZER will now display the "PROCESSOR ID" for all B6800 ERROR INTERRUPTS for the 
"CPUERRORS" and "MAINT" log requests. 
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PI 133 LOGANALY - "SO" AND "RO" OPTIONS DISPLAY 

LOGANALYZER will now display a list of SO or RO option numbers separated by commas. 

PI 294 LOGANALY - COSMETIC CHANGES 

Several cosmetic flaws in LOGANALYZER output for IOERRORs and MAINT requests have been 
corrected. 

PI 295 LOGANALY - "STOPDATE" DEFAULT 

The STOPDATE default for LOGANALYZER has been changed from 99359 to 99367 to correct a possible 
error at the end of any year. 

PI 296 LOGANALY - "MAINT" LOG ENTRIES 

LOGANALYZER will now sort MAINT log entries by date and then by time; previously, they were 
sorted by just time. 

PI 297 LOGANALY - "IOERRIRRCOUF" FIELD 

LOGANALYZER will no longer try to store the number 4 in the IOERRIRRCOUF field, which is only a 
2-b it field. 

PI 298 LOGANALY - "INVALID INDEX" IN "SORT IN" PROCEDURE 

LOGANALYZER will no longer get an INVALID INDEX in the SORTIN procedure by not properly 
resizing the JOBSWITHERRORS array. 

PI 573 LOGANALY - "132" CHARACTER OUTPUT 

LOGANALYZER will now use an output buffer size of 132 characters for Its print files. 

P1580 LOGANALY - "LOG COMMENT" EQUALS "LOG OPERATOR LC" 

LOGANALYZER will now handle "LOG COMMENT" and "LOG OPERATOR LC" in the same way as log entries 
made with the ODT requests "LC" and "LJ" are handled. 

PI 637 LOGANALY - "LOG MAINT" CORRECTION 

The headings for LOG MAINT displays has been corrected to match the changes made in the data 
displayed. The MPX and RESULTDESC , etc., headings will now line up with data displayed below 
them . 

P9026 LOGANALY - SYNTAX CORRECTION FOR "SESSION" 

LOGANALYZER will now correctly syntax the word "SESSION" and properly handle the "AP" SETSTATUS 
request, 

P9032 LOGANALY - "UA/UR" MESSAGE DISPLAYS 

LOGANALYZER will now display the MPX and PATH information for UR's and UA's involving disk 
packs. 

P9052 LOGANALY - SPURIOUS RECORDS IF FILE EQUATED TO DISK 

LOGANALYZER will now allow the LINE file to be file-equated to disk and produce the same output 
as on the printer. The problem was in the printer output that was doing SPACES which appeared 
as garbage records on disk. 

P9203 LOGANALY - LOG DATE CORRECTION 

LOGANALYZER will now display the correct time and date range for any released SUMLOG file and 
the current SYSTEM/SUMLOG file when the DATE option Is used. 

P9302 LOGANALY - MAINTENANCE LOG CHANGE 

Mark II. 8 note P5579 should be changed as follows: 

Log entries are no longer grouped by entry type, but are listed in time order within jobs. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 LOG ANALYZER 



MARK 3.0 
DOCUMENT CHANGES NOTES (D NOTES) 



PAGE 1 3B 



LOGGER 



D2536 LOGGER - "JOBSUMMARY" FILE RECORD SIZE INCREASE 

The JOBSUMMARY file record size In LOGGER has been increased from 60 to 90 words to allow more 
information to be maintained. LOGGER will be able to read the old 60-word record files, but 
all new output JOBSUMMARY files will be 90 words. Any field that is used for output will be 
zero if it falls beyond 60 words when processing old size JOBSUMMARY files. 

D2537 LOGGER - "PRE27" OPTION REMOVED 

The run-time option "PRE27" has been removed from LOGGER. 

D2538 LOGGER - "JOBENTRYTIME" , " JOBQUEUEDTIME" 

LOGGER will now display the JOBENTRYTIME of a job from its BOJ log entry. This item is stored 

in the JOBSUMMARY file and is type STRING. The JOBQUEUEDTIME is also stored in the JOBSUMMARY 

file and Is of type real. JOBQUEUEDTIME is the difference between JOBENTRYTIME and STARTIME in 

minutes. These two items only have meaning for jobs; they do not apply to tasks. 

Missing log records (unmatched BOJ and EOJ) will cause errors in these two items. 
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LOGGER 

PI 299 LOGGER - "INCLUDE, EXCLUDE" CORRECTION 

LOGGER will now handle the following correctly; i.e.. It now works like the II. 8 release: 

INCLUDE <text> NEQ " " 
EXCLUDE <lext> NEQ " " 

P1300 LOGGER - THREE VS. FOUR DIGIT SYSTEM "ID" 

LOGGER will now handle any length (1 to 17 digits) system identifiers when looking for SUMLOG 
f i I es . 

P16t2 LOGGER - VERSION HEADING CHANGED 

LOGGER will now display its complete version in its heading line. 

P16 1 t3 LOGGER - LOG TITLE DISPLAY TRUNCATED 

A possible error in LOGGER has been corrected that could cause a log title to be truncated at 
21 characters. 

P164 l + LOGGER - "REAL, INTEGER ITEMS" USED AS "BREAK ITEMS" 

LOGGER will no longer get INVALID INDEX faults when ITEMS of type REAL or INTEGER are used as 
BREAK ITEMS. 

Example: 

BREAK ON PRIORITY 
BREAK ON ELAPSEDTIME 

P16t5 LOGGER - "PRIORITY" ITEM TYPE "INTEGER" 

The PRIORITY item type has been changed to INTEGER to conform to the System Software 
Operational Guide, Volume 2, No. 5001688. 

P16H6 LOGGER - "INCLUDE, EXCLUDE" VS. STRINGS 

LOGGER will now make all INCLUDE and EXCLUDE comparisons using the minimum length of the two 
string. This corrects the problem where strings had to be padded with sufficient blanks to 
meet the length as specified in the appropriate IDTABLE. 

P861B LOGGER - "UPDATE" OPTION NEW FILE CREATION 

The UPDATE option will now copy all the records in the "old" YTDFILE to the "new" YTDFILE when 
LOGGER is run twice in the same day. 

The data in a YTDFILE will not be lost when an UPDATE is requested that crosses a new year. 
The task will stop with a date comparison error and not purge the old YTDFILE. 

P9118 LOGGER - " INCLUDE .EXCLUDE .CORRECTION" ARRAY RESIZE 

LOGGER will now allow as input as many INCLUDE, EXCLUDE and CORRECTION cards as necessary and 
not die with INVALID INDEX. The array used by these input types is now RESIZED at run time as 
needed. 

P9119 LOGGER - "EOF NO LABEL" IF INPUT EXCEEDS "60" CARDS 

LOGGER will now allow input decks of more than 60 cards. 

P920t LOGGER - RETENTION REPORT ITEM CORRECTION 

The RETENTION report item for FILEIODATA in LOGGER will now be displayed for disk packs as well 
as disk units. 

P9205 LOGGER - INCLUDE "UNITNO" CORRECTION 

The FILEIODATA item UNITNO is now a numeric item type and not a string. This allows UNITNO to 
work correctly when used in an INCLUDE or EXCLUDE statement. 

P9206 LOGGER - "BREAK ON PRIORITY" 

LOGGER will no longer get an INVALID INDEX when a control BREAK ON PRIORITY is requested. 
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LTTABLEGEN 

PI 124 LTTABLEGEN - USER SPECIFIED TABLES 

SYSTEM/ TRA I NTABLES will now be properly modified to reflect user specified train tables. 

PI 130 LTTABLEGEN - "450/750 LPM" TRAIN PRINTERS 

4-50/750 LPM train printers will now have appropriate train tables loaded for the following 
trains: 

16 char EBCDIC-3 -TRAINID=1 
64 char EBCDIC-3 -TRAINID=5 
64 char SWEDEN OCR-B -TRAINID=14 

Note: Although the appropriate tables are loaded for TRAINID's 1 and 5, they will show 
respectively as EBCDIC18 and EBCDIC72 instead of EBCDIC16 and EBCDIC64. This 
discrepancy will be resolved later. 
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D2282 MAKEUSER - USE OF "USERDATALOCATER" 

If USERDATALOCATOR* s parameter is a literal string instead of a pointer, the intrinsic will be 
invoked at compile time. If the resulting value indicates that an error occurred, the compiler 
will give a warning and generate a run-time call. If the resulting value does not indicate an 
error, that value will be used by the compiler as a constant. 
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MCP 

D2246 MCP - "B6800 MCP" 

New hardware interrupt literals are now recognized, and, where appropriate, logged. 

The format of log records reporting B6800 processor errors or diagnostic interrupts is as 
f o I lows: 

Word Contents 



— — — 






1 

2 

3 


Link 
Date 
Tine 
Type 



31:16 = 2 (LOGMAJMAINT) 
15:16 = 15 (MLCONFIDENCEERROR) 
H MCPID t7:12 = System Serial # 
35: 12 = Mark Digit 
23: 12 = Mark Leve I 
11:12 - Patch Level 

5 ProcessorlD, WHOI Value 

6 PI Parameter, PI Interrupt Parameter with Tag set to 

7 P3 Parameter, P3 Interrupt Parameter with Tag set to 

8 P2 Parameter Tag 

9 P2 Parameter, P2 Interrupt Parameter with Tag set to 0. 

The interpretation of PI, P2 and P3 is based on B6800 processor specifications. 

02249 MCP - "OF" OF "GETSTATUS" WAITING ON <FILENAME> 

OF has been added to the possible replies of the MCP GETSTATUS RSVP of "WAITING ON <filename>". 
The possible replies are now "OK", "DS" and "OF". 

D2268 MCP - IGNORE UNKNOWN UNIT TYPES 

The MCP will now ignore units which are present at Halt/Load time but have a unit type (as 
supplied by the PC encoder card) which is greater than any type the MCP is programmed to 
handle. Previously, presence of such a unit on the system would cause Halt/Load initialization 
to fai I with an INVALID INDEX. 

Note that it is still not possible to Halt/Load with an unknown unit that uses a status-change 
interrupt, since the MCP must correctly move these by control and unit. For example, this 
change makes it possible for an older MCP to ignore floppy disk but not model 235 diskpacks. 

D2269 MCP - "RESERVE" ENHANCEMENTS 

The operational characteristics of RESERVEDISK have been improved. Previously, RESERVEDISK 
would hang wajting for exclusive use of a file before attempting to copy it. This caused 
delays - some of quite extended duration - during the pass of the permanent files residing in 
.the area being reserved. RESERVEDISK may now continue through the list, and laler recycle. 
through it on operator request, presumably after some action has been taken to correct the 
blockage. If the operator is unable to correct the hangup, he may "QT" RESERVEDISK, which will 
create a new directory of XDISK titled "RESDISK". 

RESDISK is an XDISK file which is titled in the same way as "BADDISK": 

RESDISK/FMLYINX<f ami ly index no . >/UNIT<un i t no>/AD<addr es s> . 

If a RESDISK file is encountered on a subsequent reserve, it will be removed. The effect of 
this is that any part of the old RESDISK which intersects with the new RESERVEDISK 
specification is absorbed into the new set of reserved disk, and the non-intersecting part is 
released as available for system use. The rationale of this operation is that it is a simple 
solution to an otherwise complex naming problem. 

RESERVEDISK, at the end of a pass through the permanent files which intersect the area being 
reserved, will inform the operator of any files which could not be moved. The operator may 
then take one of three actions, as follows: 

* 
DS Releases all space reserved during this run of RESERVEDISK. This is equivalent to II. 7 
action. 

OK Causes another pass through the permanent intersecting files. If any are still blocking the 
reserve, they will be displayed. If no blockage now exists, RESERVEDISK will proceed to 
handle temporary files. 

QT Causes creation of RESDISK files out of areas which would otherwise be released, and then 
send the reserve to end-of-job. This option may be used to cut off the RESERVEDISK 
overhead, while preventing the subsequent allocation to areas which later may be required by 
a reserve. 
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RESERVED I SK will move executable and intrinsic files (except JOGCODE) even if they are open. 
Access to the headers is obtained with a" conditional exclusive" request and is gained if the 
file is not being used; otherwise, the file is opened as "shared". This may prove valuable for 
files such as CANDE and intrinsics, which are accessed via PRESENCEBIT and not logical I/O; 
therefore, disk addresses will not be left floating in buffers. Since they are read-only 
files, no WRITE to the wrong area after copying will occur. If a datafile is encountered open 
with only inactive rows intersecting the reserve area, these rows will be moved up to the first 
active row encountered. 

The job number of the first stack to open a temporary file is displayed, if the stack is still 
alive, which should assist the operator in identifying which job is blocking the reserve. At 
this time (during a hang on scanning for the existence of temporary files), the operator may do 
a QT, the effects of which are described above. 

Old BADDISK files are retained in the directory, even though the rows are released, If a 
subsequent RESERVED I SK absorbs them. The rowslze is set to zero, identifying the situation to 
the operator on a "PD" message. 

If a BADDISK file exists and a reserve is done overlapping its high order address end, 
RESERVED I SK will no longer hang on a duplicate name. 

D2273 MCP - "IV" VS "235" 

The IV routines for 235 diskpacks have been changed. 235 packs come from the factory already 
initialized. If the packs are damaged, they must be returned to the factory to be 
reinitial ized. 

The INITIALIZE and VERIFY routines In the MCP or LOADER must be used to put a label on 235 
packs. However, these routines will not reinitialize any cylinders on the 235 packs. 

D2439 MCP - DIRECTORY CONVERSION 

The MCP will no longer recognize or convert disks or packs that use pre-II.7 directory format. 

D2440 MCP - "NEWFILE" ATTRIBUTE 

A new file attribute has been implemented to specify whether a new file is to be created or an 
existing file is to be accessed. 

The attribute name is NEWFILE; its number is 136. Its usage and access specifications are: 

General, read/write, anytime/closed, Boolean 

The attribute actually has three states: never-set, TRUE and FALSE. If the attribute has never 
been set, then it has no effect: a new DISK or PACK file will be created if the AREAS I ZE 
attribute has been set and the MYUSE attribute is explicitly or by default OUT. If NEWFILE is 
set TRUE , then a new file w I I I be created irrespective of the settings of other attributes. In 
the case of DISK and PACK files, a default AREASIZE will be chosen by the MCP if none was 
specified. If NEWFILE is set FALSE, then an existing file will be sought, irrespective of the 
settings of other attributes. A file-open error results if NEWFILE is set incompatibly with 
the device type, such as FALSE for a PRINTER or TRUE for a READER. 

The NEWFILE attribute may be read at any time: the value is TRUE if NEWFILE has been explicitly 
set TRUE and FALSE otherwise. If the attribute has not been set, the value is FALSE whether or 
not a new file was created according to the default criteria. 

02447 MCP - "COPY" VS. SERIAL NUMBERS 

Library Maintenance has been changed to use serial numbers when they are specified for source 
disk and destination disk volumes. 

Note that when a non-zero serial number is specified, family substitution does not take place. 

D2496 MCP - SWAPPER ENHANCEMENTS 

The I I I . release contains several enhancements in the area of SWAPPER and swapped jobs. These 
include the following: 

SWAPPER Parameters: 

The SWAPPER parameter CORES I ZE may now be changed via the AX input. If it is decreased, the 

core in use by SWAPPER will be reduced as soon as tasks occupying the area to be returned to 

the system have been swapped out. If CORES I ZE is increased, the new value will be recorded in 
SYSTEM/SWAPDISK and used the next time that swapper is initiated. 

SWAPPER I/O Errors: 

If an irrecoverable error occurs during a write of a swap task to disk, a new disk area is 

allocated for the task and the write is reinitiated. If an error occurs during the read of a 

swap task, the task is error terminated and an attempt is made to return the resources in use 

by that task. 
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Any area of SYSTEM/SWAPDISK that is involved in an irrecoverable error will be recorded in the 
swapdisk preamble and that space will not be reused. All such discarded areas are displayed in 
response to an AX BADDISK input to swapper. 

Operator Inputs: 

The <mix number> and <mix number>OT inputs can be used for swap tasks. 

D2918 MCP - SEGMENTED STRING VARIABLES 



is exceeded, the 

If this length is 

to its specified 



An ALGOL string is initialized to a maximum length of 132. If this length 
string is resized (to multiples of 32 words) to a maximum of 256 words, 
exceeded, the string is segmented and increased in increments of 256 words 
maximum size (currently 65534 characters). 

D2539 MCP - "OPTIMIZER" OPTION REMOVED 

The MCP compile-lime op t i on OPTIMIZER has beem removed from the MCP and Maintenance symbolics. 

D2550 MCP -RETURN QUEUE OF ORIGIN 

In Case 3 or Case 9 SYSTEMSTATUS requests, the job class information will be put in the array 
passed to SYSTEMSTATUS after the task or compiles name. If bit 46 of the word returned is not 
on, there is no queue of origin. If bit 46 is on, the queue of origin is in bits 19:10. 

D2569 MCP - "CM" COMMAND 

The ODT Reference Manual, Form No. 5001704, Page 2-19, has been corrected. Complete new syntax 
and semantics for the CM command follow. 

~ CM I 

I- # — <filename> 

|-<fi I e n am e > 

I I I 

I- ON — <f am i I y name>- I |-<index units>- 



ON — < f am i I yname >- 



I 

I -< index units>- 



<index unils> 

|<-/2\ , I 

I I 
— ( <f ami I yindex> ) — I 

The CM (Change MCP) message changes the running MCP to the specified MCP. 

Examples: 

CM 

The name of the next MCP, if any, is displayed. 

SYSTEM/UPDATE/MCP WILL BE THE NEXT MCP 
CM # SYSTEM/X 



The MCP specified will be loaded into memory when the mix count is zero, 
are not updated. A Halt/Load causes a reversion to the original MCP. 

CM SYSTEM/UPDATE/MCP 



The bootstrap records 



The MCP waits for a null mix, finds the specified file on the current Halt/Load family, makes a 
copy of the MCP on each family index that currently has a copy of the running MCP, and 
simulates a Halt/Load from the new MCP. The name of the next MCP is displayed, as follows: 



SYSTEM/UPDATE/MCP WILL BE THE NEXT MCP 



The 
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9734 »•• CM IN PROGRESS *•• 



CM IN PROGRESS will be displayed for each row of the MCP code file that must be Moved to the 
Halt/Load unit. 

CM SYSTEM/X ON PACK 



The CM Message can specify an MCP code file on other than the Halt/Load family by using the ON 
<f am i I yname> syntax, where the f am i I ynane is a disk or pack famtlyname. In this case, 
CHANGEMCP is simply started as a visible independent runner without waiting for the mix count 
to go to zero. The particular disk or pack is set up as an MCP system disk that can be used 
for Halt/Loading. In order to actually run the new MCP, it is necessary to Halt/Load from the 
disk after CHANGEMCP goes to end-of-job. 

CM SYSTEM/X ON PACK (IND1.IND2) 

Two copies of the MCP code file are created: one on each of the familyindex units, IN01 and 
IND2. All units receiving MCPs must have a directory present at CM time; otherwise, the CM 
procedure will say the following: 

"CM INVALID FAMILY INDEX OR MISSING DISK" 

(See the DIRECTORY DUPLICATE (DD) command.) 

All MCPs will be given a suffix of the form FMLYINX<nnn> , where <nnn> Is the familyindex 
number. 

When using multiple MCPs, MCP presence bit I/Os are rotated among the list of MCPs. 

To get the default MCP configuration, use the following: 

"CM SYSTEM/MCP (1)" 

CM - 

An MCP change waiting for a mix count of zero Is cancelled. 
CM - ON PACK 



CM - ON PACK (IND1.IND2) 

The bootstrap is erased from the indicated Halt/Load family and the MCP code file may be 
removed by the operator. 

DS577 MCP - CLOSE "REEL" STATEMENTS 

A request for a reel switch (e.g., a COBOL CLOSE REEL statement) will no longer leave an open 

file in the closed state if the file's kind is not a magnetic tape device. Instead, no action 

will be taken at all, leaving the file in the same logical state (i.e., open) that it would be 
if its device kind were magnetic tape. 

A request for a reel switch on a closed file will continue to attempt to do a normal close on 
the file. 

02579 MCP - "PRE-2.4 ON <FAULT> STATEMENTS" 

The MCP version 3.1 will no longer support the 'ON <fault>' statements compiled by the ALGOL, 
DCALGOL or ESPOL compilers prior to the 2.4 release. An entirely new mechanism was implemented 
in 2.H (released mid-1973). 

Any existing code file which was compiled with a 2.3 or older compiler and which uses 'ON 
< f a u I t > ' statements must be recompiled prior to being run on a 3.1 system. 

If such a code file is run on a 3.0 MCP, the following warning message will be generated the 
first time an 'ON' statement Is executed: 

BEFORE 3.1, RECOMPILE PRE-2.4 CODE WITH 'ON' STATEMENT • <addr> 

The <addr> is tne line number, or seg:word:syl address if no lineinfo is present, for the 'ON' 
statement. Only one message is generated for any one task. The message will appear in the job 
log, and will be sent to the user's terminal if the task was run via CANDE and the user's 
MESSAGE options is set. 

Note that the 'ON' statement Is "executed" whenever it appears in the flow of control, to arm 
the fault trap. It Is at arming time, not fault-detection time, that the program will be 
aborted. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
MCP 

PI 126 MCP - STICKY MEMORY 

The sticky memory function available to DCAL60L via the resident function may now be used in 
the MCP by calling the procedure MAKERESIDENT. 

PI 182 MCP - "DBS 03 NOMEM" 

DMSOPEN will now hang with an RSVP if Insufficient memory Is available for the D3 slack. If 
this RSVP is DS'ed, DMSOPEN will return ERROR 42. 

PI 224 MCP - AVOID "GO TO" EXITED BLOCK 

An attempt to perform a GO TO from a procedure invoked by an EPILOG to a label declared In the 
same block as the EPILOG will be intercepted and handled as though the label had been at the 
very end of the block. No further statements will be executed in that block (which is being 
purged at block-exit when the EPILOG was invoked). 

PI 233 MCP - SPLIT "DBS" INTO ACTIVE/NONACTIVE 

The DBS bit In stackinfo is now split Into two bits. One bit identifies the slack as a DBS; 
the other bit will be true If and only if the DBS is active. This corrects a problem which 
resulted in nonaclive DBS stacks being left around due to the use of the "visible DBS " . 

P1313 MCP - "LINKLLISTIT" 

FLATREADER no longer calls LINKLISTINSERT so often. When doing catalog rebuilds, etc. it no 
longer processes Irrelevant directory rows. Consequently, less processor lime is used. 

P1314 MCP - "CP" VS. "HPT/PACK" 

When a job thai lakes a checkpoinl to a PACKCDISK) goes to EOJ, it will not Iry to REMOVE tor 
CHANGE) the CP file on DISK(PACK) if no CP file was put there. 

P1316 MCP - "CP" FILE SECURITY 

Checkpoint files will now have CLASSA 10 security. 

P1317 MCP - LOCKS VS. "PAST" 

Doing a VOLUME DELETE and powering down unvolumed disk units will no longer hold up normal 
directory accessing of other disk units. 

PI 323 MCP - FILE SIZE VS. CLOSE WITH CRUNCH 

The MCP will now log the correct FILE SIZE when a file is closed with CRUNCH. 

PI 324 MCP - MAKE "WFL" USE DIRECT ARRAY 

The interface between the operating system and WFL has been changed lo use a direct array 
parameter . 

PI 326 MCP - "INFOOUMPER" OPTION 

A user option, INFODUMPER, has been defined to facilitate creating info files. If INFODUMPER 
is set, DUMPINFO will be performed at 18999997. 

PI 327 MCP - ERROR MESSAGES FOR UNRELEASED ATTRIBUTES 

If a program attempts to use an unreleased task altribute or file attribute, it will now be 
DS'ed with an appropriate message. 

PI 328 MCP - FOREIGN PRINTER TRAIN PROBLEM 

A problem has been corrected which affected a foreign printer train. This correction does not 
affect domestic line printers. 

PI 329 MCP - SPECIAL PERIPHERAL CONTROL 

A new unit type has been implemented. 
P1330 MCP - "GETSTATUS" VS. DIRECTORY 

LISTVOLUMELIB will no longer allocate a disk file as big as the system catalog. 

FLATREADER errors will now cause dumps if the MCPTEST option is set. 

PD to a off-line volumed disk will work again. 
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PI 331 MCP - "READER BADMOM" 



The LA array, which was being incorrectly reused when looping to read from a backup directory, 
has been removed . 

PI 333 MCP - "PATHRES PBIT" 

The following function has been corrected: 
UA PK<nn> MPX<m> PATH<p> 
P133H MCP - "CM" SUPPRESSES "SEEK" 

CM will now work properly for Halt/Load units which do SEEKs . 

PI 383 MCP - JOB SCHEDULETIME 

The time at which a Job enters the system (i.e., WFL has successfully compiled the job and it 
is ready to be inserted into a Job queue) will be maintained for the Job summary and the system 
log. The information Is an addition to the fixed portion of the BOJ log record. 

On a printed Job summary, the following entry will be printed under the BOJ information: 

"JOB ENTERED SYSTEM: <date> <ttme>" 

PI 384 MCP - MULTIPROCESSOR DUMPS 

ANSWER was calling HARDWARE I NTERRUPT67 to enter TAPEDUMP instead of calling the procedure at 
which TAPEDUMP pointed DO+3. This has been corrected. 

PI 385 MCP - ALLOW RECOVERY FILES AFTER "DS" OF "DCP" 

An MCS could not set FILE.FILEKIND to RECOVERYFILE after the DCP was DSed. This has been 
corrected. 

PI 391 MCP - DIRECT READ FROM SCHEDULE FILE 

It was possible to get a "DUMP BY FAULT IN DO CODE" and hang a job when a direct datacom read 
was done that tried to read from a schedule station. This has been corrected. 

PI 394 MCP - "FILEKIND=FIRMWARE" 

A new FILEKIND, FIRMWARE-1 15, has been defined. This FILEKIND will be used for diskpack 
controlware files in the future. 

PI 395 MCP - "DISCSTATUS" CHANGES 

Errors in DISCSTATUS will now be reported with an appropriate error message (I/O errors can 
occur on testop or when trying to read buffer memeory from the control), as follows: 

1 . PK<nn> NO 10 PATH 

No path to given disk. 

2. PK<nn> I/O QUEUE BLOCKED 

I/O was cleared after 10 seconds in the queue without ever being 
initiated. 

3. PK<nn> NO I/O FINISH 

I/O was cleared after 20 seconds; I/O was initiated but was never 
comp I eted . 

4. PK<nn> UNIT TYPE CODE:<xx> IS INVALID 

The 2-digit unit code <xx> read from the buffer memory is undefind. 

PI 396 MCP - "OL PK" 

OL PK<nn> will now display the proper controller type: BX380 , BX383 or BX385. 

PI 397 MCP - "PB" MT< NUMBER > VS. "ACMAX" 

While printing a BACKUPPRINTTAPE , AUTOPUNCH would not fire up automatically if ACMAX were less 
than or equal to the number of printing BACKUPPRINTTAPEs . this has been corrected by charging 
the "PB MT#" against the APMAX and not the ACMAX. 

PI HOI MCP - "UA" PATH TO TAPE 

"UA MT<nn> MPX<m> PATH<p>" will now lest for existence of a path to MT<nn> before marking the 
path on-line. 
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P1408 MCP - "FAULTHANDLER" VS. TAGGED WORDS 

It was possible for the processor to superhalt when a user program with an ON FAULT statement 
handled certain INVALID OP Interrupts. This has been corrected. 

P1415 MCP - TAPE "403" RESULT DESCRIPTOR 

Under some circumstances, during tape parity retry the I/O length in a tape result descriptor 
could be incorrect. This has been corrected. 

P1432 MCP - "CP" VS. "AIT" 

Under certain conditions it was possible for RERUN to abort with an INVALID OP in bloeksearch 
after restoring the AIT. This has been corrected. 

PI 433 MCP - "CP" SECURITY 

If a non-privileged user Job took a checkpoint with a temporary disk file open, a subsequent 
RERUN would be DSed for a security error. This problem has been corrected. 

PI 454 MCP - "READALABEL" UPDATE OF TAPE KIND 

When a tape Is VOLUME ADDed, the site, creat I ondat e , tapekind. etc., fields are left so that 
READALABEL will update them when the tape is first mounted. The TAPEKIND field is now properly 
updated by READALABEL. 

Also, FINDINPUT will now report a backup kind of "MT" for family members (TAPES) whose kind is 
still Instead of "MT7" in the "NO FILE" message on machines with cataloging set. 

PI 457 MCP - FILEDATA CATALOG RESIDENT INFORMATION 

A CATALOG command now reports correct resident Information on cataloged files. 

PI 478 MCP - ENDING BANNER VS. PAGE SIZE 

The "END" and "CONTINUED" print banners produced by AUTOBACKUP will no longer overlap onto a 
second page when a printer has small paged forms. 

PI 479 MCP - PROTECTED FILES VS. UPDATE FILES 

Protected FILETYPE 1 disk files would give EOF NO LABEL when extended past EOF after a 
Halt/Load. This problem has been corrected. 

P1480 MCP - REPLY LEFT ARMED "(NQDISK)" 

The procedure GETUSERDISK could exit leaving the reply word armed and the segments required 
message displayed. This has been corrected. 

PI 482 MCP - "SWAPPER" VS. "EI" 

If SWAPPER Is scheduled because of a system EI, swappable tasks may be scheduled forever. This 
problem has been corrected by allowing the scheduled tasks to run outside of subspace. 

PI 483 MCP - BLOCKSEARCH, EPILOG VS. "GOTOSOLVER" 

Bad GOTOs from epilog procedures declared in blocks with no local array declarations now work 
proper I y . 

PI 487 MCP - "FLATREADER" BAD RECORD MESSAGE 

FLATREADER now produces error messages that include the record number and type of directory 
record in error. 

P1493 MCP - "LIBMAINT" VS. "TAPEPARITYRETRY" 

A tape I/O error which occurred while writing the tape directory when copying files from the 
Halt/Load family would hang the system. This has been corrected. 

P1512 MCP - "DMSOPEN" HEADER 

DMSOPEN had a disk file header descriptor in its local stack when it got swapped out to be 
enlarged by PBIT on SIB. The DESCRIPTOR has been replaced by an SIRW to the header stack. 

PI 537 MCP - DANGLING REPLY EVENT IN "GETUSERDISK" 

GETUSERDISK will no longer leave a reply event armed when it is DSed just before displaying the 
RSVP. 
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PI 553 MCP - CONTROLLER MALFUNCTION 



For certain I/O errors, the "I/O path" involved will be marked off-line by the MCP, after which 
the MCP will output the following message: 

UNIT MPX<m> PATH<p> RD-<xxxxx> PATH MARKED OFFLINE 

Currently, this action will be taken only for controller malfunction on diskpack controls. 

Model 1 and Model 2 multiplexors paths cannot be locked out by the MCP; therefore, on these 
systems, the path will continue to be used. 

PI 554 MCP - "RCNTL" 

Tape files can now have up to 2**26 « 67,108,864 records without getting record count errors. 

PI 555 MCP - MAKE "SWAPPER" SAVE WHEN RUNNING 

SWAPPER dials the processors to handle stack stretching searches; it must, therefore, be save 
when it is running. 

PI 559 MCP - VOLUME DELETE 

Deleting volumes from a volume family with more than one family member was corrupting the 
volume library. This problem has been corrected. 

PI 560 MCP - "AX" 

If the operator inputs an AX command to a task in the schedule, the controller will now reply 
"IMPROPER STACK STATE". 

PI 561 MCP - "FORMATBUFFER" 

The FORMATBUFFER size will now be determined by the format intrinsics rather than the MCP. 

PI 562 MCP - MODEL "4" MULTIPLEXOR 

The B6800 Model 4 Multiplexor always "locks path" when an error occurs on pack or disk. The 
MCP will now unlock the path, even if the read log command is not issued. 

P1563 MCP - "IAD" VS. "HLUNIT" 

IAD disk packs in the Halt/Load family may now be closed if there are no open files on them. 

PI 659 MCP - "TD830" VS. NON-TD830 "ODT" 

The extra ETX character has been eliminated from systems which are using TD800 (TD804) , CONRAC 
as ODTs. The ETXs are required on TD830 ODTs by the terminals' internal firmware. 

FILEDATA has also been corrected; it must be used in conjunction with this change. 

The following hardware must be changed in some cases to cause the correct terminal type to be 
reported: 

B6700 with SLC ODT controls: 

CONRAC The terminal ID block on the SLC needs a pin inserted in the "CON" location of 
each ODT. 

TDBOO The terminal ID block on the SLC needs a pin inserted in the "9348" location of 
each ODT. 

TDB30 The terminal ID block on the SLC needs a pin inserted in the "9348" and "BIDS" 
location of each ODT. 

B6B00 with SDC II ODT controls: 

TD830 These are the only ODTs connected to this control. They require no change for the 
use of these patches. 

PI 667 MCP - UPDATE "I/O" VS. "IOERROR" 

The problem with update I/O to a disk file has been corrected. Formerly, if an I/O error retry 
occurred when writing the last record of a disk file row, and if the next row were on a 
different unit, the read of the next record would not be done. 

PI 668 MCP - MEMORY DUMP 

An intermittent failure to take a memory dump to tape could occur on multiprocessor systems 
when a processor other than the one taking the dump gets an I/O finish interrupt before the 
PROC-TO-PROC interrupt issued by the dumper. 
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This has been corrected. 
P8629 MCP - "PD" TO MISSING FAMILY 

PD commands directed to missing families will now get the response "NO FAMILY". 
P9024 MCP - "FIBLOCK" AND "TIMESTAMP" 

1. Binary disk I/O will no longer hang. 

2. REAO(F,*,A) will no longer change the disk file TIMESTAMP. 
P9176 MCP - "SWAPPER" QT'S "BACKUP" 

BACKUP will no longer be QT'ed by SWAPPER when running In swapspace. 
P9286 MCP - "DM6700" VESTIGES REMOVED 
The vestigial code and external declarations for DM6700 have been removed from the MCP. 
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D22«+0 NDL - "FINISH TRANSMIT" WITH DELAY 



The NDL Language 

of the FINISH TRANSMIT 

semant I cs on 



Reference Manual, Form 5000953, dated 1-75, 
statement when the optional <delay ti 
page 5-95 should read as follows: 



incorrectly describes 
me> is supp lied. The 



the function 
comp I e t e new 



The purpose of the <finish statement) is to complete the transmission of the last transmitted 
byte in preparation for receiving Information. If the <delay time> is not specified or is 
NULL, the adapter cluster will wait for the completion of the transmission of the last byte 
then an additional 2 milliseconds before allowing the DCP to proceed to the next statement, 
addition, the line is placed in receive mode, although the adapter cluster will not sense 
characters for an additional 25 milliseconds. An INITIATE RECEIVE statement should precede 
subsequent <receive statement) to override the 25 millisecond delay. If the <delay time> 
specified and is non-NULL. the DCP will simply perform a delay for the specified time. 
INITIATE RECEIVE statement is also required In this case to place the line in receive mode. 



and 

In 

any 

any 

i s 

An 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
NETWORK DEFINITION LANGUAGE 



PI 056 NDL - INCREMENT SEQUENCE CORRECTED 

The NDL compiler was falling io anil tha proptr ABORT labal whan tha INCREMENT SEQUENCE 
statement was used without any arror action specified. Tha bad coda than causad an INVALID 
INDEX fault In Pass Ona of DCPPROGEN whan It triad to daflna tha non-axistent labal. This has 
baan correct ad . 

PI 361 NDL - AUXILIARY LOGIC CORRECTION 

In II. 9 tha NDL compiler was anhancad to allow salactive DCP coda assignment to either local or 
main memory; however, under certain circumstances (such as having no local memory, or using tha 
SAUXLOGIC statement without also using the AUXILIARY statement In the DCP section), the 
selective code assignment was not being performed properly. The problem usually appeared as a 
series of "LABEL ERROR"s encountered during PASS TWO of DCPPROGEN. All known or suspected 
problems related to auxiliary logic usage have now been corrected. 

P9121 NDL - ONE-CHARACTER REQUEST IDENTIFIERS 

An NDL compiler error message of "UNDEFINED REQUEST IDENTIFIER" or "UNDEFINED CONTROL 
IDENTIFIER" was being generated erroneously in the TERMINAL section of a SOURCENDL program that 
referenced one-character length requests or control section identifiers. This problem has been 
corrected . 

P9122 NDL - "EOF" WITH MISSING DEFINE CROSSHATCH 

Under some circumstances, tha NDL compiler would go Into an infinite loop if the Crosshatch (#) 
terminating a global define ware missing and end-of-flle on the input file were encountered. 
This problem has been corrected; now, the error message "INCOMPLETE DEFINITION" will be 
displayed when no terminating Crosshatch has been found by end-of-file, and the compilation 
will be aborted . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

PATCH 

PI 198 PATCH - INCORRECT SEQUENCE ERROR ISSUED 

A problem with incorrect sequence errors being issued by SYSTEM/PATCH has been corrected. 

P9123 PATCH - INCORRECT HANDLING OF "S.DISK" CARDS 

PATCH will no longer throw away the last 80 columns of input records after processing a S.DISK 
command that is within a S.PATCHDECK, $. DISKS or S.FILE command. 



B7700/BB700 MARK 3.0 RELEASE 7 JUNE 1978 PATCH 



PAGE 154 
MARK 3.0 

DOCUMENT CHANGES NOTES (0 NOTES) 

PL I 

DEE61 PLI - "LEX LEVEL" > "15" 

A warning is no* issued for blocks which are nested to a lex level >15. 

D24E2 PLI - "STATISTICS" 

Times reported when the STATISTICS control card option is set are now processor times rather 
than elapsed times. 

Because the MCP intrinsic TIMEU2) is being called, more overhead is involved in reporting 
processortimes. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
PL I 

P10H1 PLI - FAILURE TO FLAG LARGE PRECISION 

The PL/I compiler sometimes failed to flag declarations with too large precision specified. 
The following example was not being flagged, but was being treated as having precision (ld.U): 

DCL B BIN FIXEDC780) 

The compiler now emits a Level-3 warning for all precision values which are too large. 

PI 302 PLI - "RESTARTED" TASK ATTRIBUTE 

The RESTARTED task attribute is now being correctly handled as a boolean task attribute. 
Previously, the compiler was treating the RESTARTED attribute as a file attribute. 

PH67 PLI - "SET STATISTICS" 

When the control card option STATISTICS was set via control cards containing quotes; i.e., "SET 
STATISTICS", the next card image would be lost. 

Now, both "SET STATISTICS" and SSET STATISTICS work correctly. 

PI 468 PLI - PREPROCESSOR "INITIAL" ATTRIBUTE 

The INITIAL attribute was not handled correctly under the following circumstance: The INITIAL 
attribute was applied to a declaration local to a preprocessor procedure. 

Example: 

MAIM: PROC; 

*P:PROC RETURNS (CHAR) ; 

DCL STR CHAR INIT('I-J') ; 
(1) RETURN (STR); 
XEND P; 
XDCL P ENTRY; /*ACTIVATE P*/ 

P; 
END MAIN; 

Statement (1) would cause an erroneous preprocessor error to be given. The INITIAL attribute 
is now handled correctly under all circumstances. 
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D2254 PLINTRN - SUMMARY OF CONDITIONS AND DS'ED DISPLAY 
The information printed when a PL /I program aborts has been improved. 

1. The complete STMTNO information is printed in the description of the conditions that are 
raised. 

2. The stack history printout is expanded to a maximum of 5 lines. 

3. The DS'ed display now indicates the full description of the condition. 

4. Only the DS'ed display (not the complete printout) is produced for PL/ I programs run from 
CANDE (if no dumps were taken and the options for the task do not specify a program dump). 

5. File and task attribute errors (run-time) will cause an ATTRIBUTE condition (ONCODE=2000 
through 2004). The system action for this is to cause the ERROR condition. 

The ATTRIBUTE condition (ONCODE=2000) has been caused in the past, but the ERROR condition 
was never caused. It is now possible to recover from file and task attribute errors bv 
using an ON ERROR unit. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
PLI INTRINSICS 



PI 099 PLINTRN - CHARACTER TO BIT CONVERSION 

A character string declared CHAR (48) assigned to a bit string declared BIT(HB) would result in 
the bit string having a value of all zeroes regardless of the value of the character string. 

Example: 

P:PROC; 

DCL B BIT(48); 

DCL C CHARC+8) INIT ('01010101'); 

B=C; 
END P; 

C would be '01010101' but B would incorrectly be 'O'B. This has been corrected. 
P9125 PLINTRN - "ISAM" , "ISCLOSE" CHECKS VALUE OF PARAMETER 

The ISAM intrinsic procedure ISCLOSE will now more carefully check the value of the second 
parameter "type" for being in the value through 3. 

If a bad value is delected, the bad parameter bit (Bi I 12) • 1 I I be se t in the "suit returned 
from the intrinsic. The file will be closed with RELEASE (as if the type had been 0). 

This change will prevent possible system failure from occurring if a bad "type" value is passed 
to ISCLOSE. 

P9126 PLINTRN - "ISAM" , DELETE FIRST RECORD IN FILE 

The ISAM intrinsic ISDELETE was not properly deleting the record with the I owes J . key . The key 
was being left in the "FINE" and "COARSE" index tables; thus, the record could st.ll be found. 

This problem has been corrected; the first record of the ISAM file will now be correctly 
deleted. 

P9127 PLINTRN - "ISAM" , NUMERIC KEYS 

The ISAM intrinsic ISDELETE will now correctly delete records when the key "mode" is one of the 
varieties of numeric (MODE=0, 2, 3, t, 7 or B) . 

The ISWRITE intrinsic will properly check for duplicate records (and add them when requested) 
when these records contain "numeric" keys. 

The inlrinsics were comparing record keys for exact bit pattern match in these «•»••• The 
Intrinsic now uses the proper compare based upon the mode of the key; thus, numeric keyed 
records are correctly deleted and correctly added. 

P9128 PLINTRN - "ISAM" . ADDING RECORDS TO UNBLOCKED FILES 

The ISAM intrinsic ISWRITE will now properly add records to a file that was create d w i th 
MAXRECS1ZE the same value as BLOCKSIZE. The intrinsic was not Properly reading up listing 
records prior to modifying their record links; this would d'jtroy .11 data In the or 
immediately before (logically) the added record and lose the links to the record following 
(logically) the added record. 

P9129 PLINTRN - "ISAM" , RETURN PROPER VALUE FROM "ISKEYWRITE" 

The ISAM intrinsic ISKEYWRITE was erroneously returning a value of 1 when there was no error 
condition. The correct value of zero is now returned. 

P9130 PLINTRN - "ISAM" . ERRONEOUS "ISCLOSE" RESULT OF "261" 

The ISAM intrinsic ISCLOSE would sometimes erroneously return a value of 261 (rather than the 
value 01. 

This situation would arise only if the last operation on the file (prior to calling ISCLOSE) 
was to add a record to the file (using the ISWRITE intrinsic, with the file opened for I/O) 
such that the file overflow area had to be lengthened by one block. 

This problem has been corrected; the ISCLOSE intrinsic will now return zero in this situation. 
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D2260 RJE - "WAIT" NO LONGER A DEBUG OPTION 

RJE will now al low the sett ing and resetting of the SM : WAIT option in versions of RJE that are 
not compiled with DEBUG set. 

WAIT Syntax 

--(mix #>— SM — WAIT 1 

I I 
I- + -I 
I I 



WAIT will display current setting of option. 

WAIT+willsetoption. 

WAIT - will reset the option. 

D2262 RJE - "STAT ION ID" CAUSED RECONFIGURATION 

The RJE option STATIONID will now allow the reconfiguration of RJE stations that are not 

MlvilSS^KiAi'c! err, Mne in lhe hosl s y 3tem ' 3 NDL - Th8 compile-time RJE defines, MAXTERMINALS and 
MAXIERM1NAL5L0G2, must be large enough to encompass as many terminals as are placed under the 
control of this MCS. 

Note: MAXTERMINALS must be large enough to handle all RJE stations declared in the NDL 
regardless of line assignments. 

02274 RJE - "SAVE/READY" STATION REMOVAL 

All occurrences of saving or readying the remote site's card reader/card punch and the line 
printer have been removed. This will correct problems with the RJE request set while doing I/O 
to a unit that is being saved and or readied. This will also correct the problem of a card 
input file being lost when read in between to a punch output file and during the queue flush. 

D2401 RJE - "REMOTEPUNCH" $ OPTION REMOVAL 

There is no longer a compile-time option REMOTEPUNCH in RJE, as all versions of the symbol will 
be remotepunch capable. 

D2t06 RJE - ENHANCED BACKUP FILE HANDLING 

RJE printer backup handling has been redesigned. The objectives of this redesign are to 
provide the following capabilities: 

1. Continuation of listings after an interruption (i.e., printer jam, Halt/Load, RJE fault 
e t c . ) . 

2. Ability to move printer position either ahead or back "n" pages. 

3. Ability to interrogate files ready for printing and to selectively print a subset of these 
files. 

AUToIaCKUP 9 * 9 °" ly aff * cl P rinler output; punch output is unaffected by the modifications to 

A new run time option, CONTBACKUP (continue backup), has been implemented.. It is set by 
nni?SUi>no ? V,l ? e m * y b * Seen wilh ths * T0 command, *"d changed by the »RO or *SO commands. If 
LUNItJACKUP is set and a listing is interrupted, the listing will be continued close to and 
before the point of interruption rather than started from the beginning. If it is reset, the 
listing will restart from the beginning of the current copy. A special header, with " CONT " (for 
continue) in block letters and the job number, will be printed before the listing is continued 
Thus listings which have been continued may be easily identified. This default continuation 
may be overridden at print time by use of a new verb. As RJE AUTOBACKUP Is printing a listing 
the linkfile will be updated periodically to reflect the last page printed. When RJE recovers 
from an interruption, the number from the linkfile will be used to continue the listing. The 
RJE operator will be granted read/write access to this number. Listings may be restarted or 

rnwTciHoJMn ° n * P * r j0b basis - Punch output will not be continued regardless of the value of 
LUN I BACKUP . 

A new command, "BACKUP, has been implemented. The syntax is as follows: 

— 'BACKUP 1 

I I 

|-<output spec i f i cat i on>- I 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 REMOTE JOB ENTRY 



PAGE 159 



MARK 3.0 



<oulput specification> 
--<job number> 



i i 

1-/1 1\- / <task number> -| 



j - / <f 1 I ename> - I 



<job number) := number between 1 and 9999 inclusive 

<task number> := number between 1 and 9999 inclusive .... 

<file name> := internal file name preceded by a 3 digit number. If the internal file 

name contains non-alphanumeric characters, it must be enclosed in 

quotes. 

The BACKUP verb can be used to list all RJE printer output available, printer output associated 
with a particular Job, or a subset of the printer output for a particular job that can be 
printed at the station. This verb is used to show all the files which can be output and does 
not show what jobs are queued for output. Printed along with the output name will be an 
estimate of how many pages it will take to print the specified file and, if appropriate, the 
form required. 

For example, assume the following directory exists on disk or pack: 

REMLP02 

0000503 

0000520 

000CHECKS 
000SUMMARY 
+ 
0000531 

"000REPORT FOR JOE" 
000SUMMARY 

00005B3 

000L1NE 

001LINE 
0000573 

000F 
000SUMMARY 

NOTE- "SUMMARY" files are special system files used by RJE to print headings, and will not 
be shown by the BACKUP verb. These are not ordinary files and will not be printed as such. 

Show all printer output for this station: 

•BACKUP 

PRINTER BACKUP 

503/520/ 000CHECKS, 22 PAGES. FORM- "CHECKS" 

524/531 /"000REPORT FOR JOE ",2000 PAGES 

545/563/000LINE.20 PAGES 

5t5/ 563/ 001 LINE, 25 PAGES 

545/573/000F.10 PAGES 

# 



0000524 



0000545 



Show all printer backup for job 545: 



•BACKUP 545 

PRINTER BACKUP 545 
563/000LINE.20 PAGES 
563/001LINE.25 PAGES 
563/000F.10 PAGES 
# 

Show printer backup for subset of the entire job: 

•BACKUP 545/563 

PRINTER BACKUP 545/563 
000LINE.20 PAGES 
001 LINE, 25 PAGES 

# 

Show a specific file: 

•BACKUP 54S/563/001LINE 

PRINTER BACKUP 545/563/001LINE 
25 PAGES 



Tha primary use of the BACKUP command will be to display the output available so that a 
selective subset can be printed via the new Make Entry (»ME) command. Syntax for this command 



is as foil ows : 
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l<- 



— *ME — <output sp ec i f ! c a t i o n >- 



COPIES <integer>- 

I I 
I- = -I 



SAVE 



I 



TRUE 

! I I 

I- - -I I- FALSE — 



The *ME command is used to create a new entry in the print queue. This new entry will only 
cause output to be directed to the printer (i.e., will not punch any output). RJE will respond 
to this command with either "NO BACKUP ON DK OR PK", "JOB ACTIVE", or " YYYY.XX QUEUED". If 
backup is queued it will be placed at the rear of the print queue. The number (YYYY.XX) is used 
to distinguish between print requests on the same job. "YYYY" is the number of the job which 
created the printer backup and "XX" is a RJE supplied "uniqueness" number. A special header, 
with the word "PRINT" in block letters along with <job number>.<uniqueness number> and the *ME 
command that was used, will be printed before the associated files are printed. For example: 

*ME 545 C0PIES=2 SAVE 

545.1 QUEUED (ME 545 C0PIES=2 SAVE) 
*SP 

PRINT QUEUE 

C 503 

C 545.1 (ME 545 COPIES-2 SAVE) 

# 
•BACKUP 545 

PRINTER BACKUP 545 

563/0OOLINE.20 PAGES 

563/001 LINE, 25 PAGES 

573/000F.10 PAGES 

# 
•ME 545/563 SAVE 

545.2 QUEUEDCME 545/563 SAVE) 
*SP 

PRINT QUEUE 

C 503 

C 545.1 (ME 545 C0PIES=2 SAVE) 

C 545.2(ME 545/563 SAVE) 

# 

After the backup files are printed, they will be purged unless SAVE is specified. The value of 
COPIES determines the number of copies of the listing that will be printed at the RJE station; 
the default value is 1 and the valid range is between 1 and 1023, inclusive. The use of SAVE 
alone will cause the files to be saved. "SAVE TRUE" and "SAVE FALSE" have the obvious meaning. 

The Show Print Queue command (*SP) has been modified. Previously, this command displayed the 
list of Jobs to be printed as they appeared in the print queue. The display has been expanded 
to include the following for each print queue entry: 



If the entry 
identification 



b. 



will be continued after an interruption, a " C " will precede the 

............ number. This continuation/restart flag is set by the value of CONTBACKUP 

when the entry is inserted in the print queue. The value may be modified by the new "*CE" 
command (see below), once the entry is in the print queue. 



If the 
and/or 



a *ME command, the current specifications (i.e., the SAVE 

be used to reconstruct that command for display. This 

reconstructed command will be enclosed in parentheses and wilt follow the print queue 
identification number. 



entry is 
COPIES 



the result of 
values) will 



c. If the entry ts not the result of a *ME command but has been modified from the default 
value via a *CE command, then that command will be reconstructed from the current 
specifications. The reconstructed command will be enclosed in parentheses and will follow 
the print queue Identification number. 

d. If the entry has ever begun to print (i.e., if it is the currently printing job or one 
that had been interrupted), then the display will include the file name and in 
parentheses the page number where continuation might occur. 

For example (assuming an AUTOPRINT mix number of 200): 
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*SP 

PRINT QUEUE 

C 54-5.1 (ME 545 C0PIES=2 SAVE) 
C 545.2(ME 545/563 SAVE) 

# 

* S lolaO AUTOPR1NT/LSN038/"#0200" — FM REQD:CHECKS 

#NO TASKS ACTIVE 
•200FM 
*SP 

PRINT QUEUE 

C 503 FILE-503/520/000CHECKS<22> 

C 545.1 (ME 545 C0P1ES=2 SAVE) 

C C |SB:?(mI ISS'SSlisS! FILE=501/000LINE(20) COPY-3 



The *PB command has been enhanced. The new syntax is as follows: 

__ «pb 7 

I __ 

| <]ob number> 

||l ' 

■ _ _ _ I I - . <uniqueness number>-| 

The *PB command I. used to change the relative positions of entries in the print queue and 
possibly to create an additional entry. The semantics of each use are as follows. 

*PB 

When AUTOPRINT suspends itself after printing a formed backup file. -PB" is used to resume 
AUTOPRINT. 

*PB <job number) 

This form of the «PB command retains its original meaning. It is used to cause the backup 
JroduceS by <Iob number> to be the next backup files output to the prmter. 

*PB <job number>.<uni queness number> 

This form is used to move to the head of the queue entries created by a *ME command; i.e.. 
that entry's output will be the next files printed. 

*PB-<jobnumber> 

»PB _ <j b number>.<un i queness number> 

This form is used to remove a print queue entry from the print queue. The currently 
printing print queue entry may not be deleted. 

For example: 

*SP 

PRINT QUEUE 

C 503 FILE=503/520/000CHECKS(2E) 

C 545.1 (ME 545 COPIES-2 SAVE) 

C 545.2CME 545/563 SAVE) 

# 

* S Jo200 AUTOPRINT/LSN038/»#0200» - ENTER "*PB» TO CONTINUE 

#NO TASKS ACTIVE 
*PB 

# 

*SP 

PRINT QUEUE 

C 545.1 (ME 545 COPIES-2 SAVE) 

C 545. 2 (ME 545/563 SAVE) 
»PB 524 

* 
*SP 

PRINT QUEUE 

C 524 

C 545.1 (ME 545 COPIES-2 SAVE) 

C 545. 2 (ME 545/563 SAVE) 

* 
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*PB 545.2 

# 
*SP 

PRINT QUEUE 

C 545.2(ME 545/563 SAVE) 

C 524 

C 545.1 (ME 545 C0PIES=2 SAVE) 
* 

*PB -545.1 

545. 1 DELETED 
*SP 

PRINT QUEUE 

C 545.2 (ME 545/563 SAVE) 

C 524 

# 



With CONTBACKUP set (default value). listings will automatically be continued a 
The e s r ntlx°ls as follows^ continuation may be changed by the new Change Entry (*CE) 



across an 
command. 



— *CE 
> 



I 



l-<print queue entry>- 



l<- 



I I 



-/1\- RESTART - 
-/1\- CONTINUE 
-/1\- SAVE 



I I 



TRUE 



I- - -I I- FALSE — 
-/1\- COPIES <integer>- 



-/1\ + < integer >- 

I I 



<print queue entry) 
— <j'ob number> 



<uniqueness number) -j 



l!l!»*? E command is used to modify or interrogate entries in the print queue. The 
output will be similar to that of the *SP command. The value of RESTART, CON 



format of the 
CONTINUE, SAVE and 



rnPTrc k.. it • z '"' -■ i. «•" i«vmm«iiu. mi value or KL9 AK , UUN I NUt . SAVE and 

.ntl!! I*. l U 'l i on P unc 5 o"tput. For example, if SAVE is specified for the <pr nt queCe 

!?}i y h: ,.! 5 t. ° U t p l' t for 1 th « t •»"» "'"I be output once and then the correspond i no fites 

w s m ' u *CE command will result in some physical action. The semantics associated 



«CE 

Returns the following information: 

I. A print queue Identification number. If this entry will be continued after an 
interruption, then a "C" will precede the number. 

.L i H-.!? lr V S *■' r *'1 n 0f * * CE or * ME command, that command reconstructed 
and displayed enclosed In parentheses. 

3. The file name end page number of the file currently being printed. 

:Lll!i? ,, " k, r ?• e«P'«« specified is greater than one, the number of the 
currently printing copy. 

*CE <prinl queue enlry> 



The same information given for 
queue . 



CE" will be returned for the specified job in the print 
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*CE < print queue entry> SAVE 

AUTOPRINT will not remove any files when performing the request specified by the given 
print queue entry. 

*CE < print queue entry> COPIES=< i n t eg e r > 

< i n I e g e r > number of copies will be printed for the specified print queue entry. 

*CE <print queue entry> CONTINUE 

The specified job will be continued if it is interrupted, regardless of the value of 
CONTBACKUP. 

*CE < print queue entry> RESTART 

The specified job will be marked to be restarted rather than continued, regardless of the 
value of CONTBACKUP. 

*CE < print queue entry> + <integer> 
*CE <print queue entry> - <integer> 

For this form of the command to be useful, the specified job number must be marked a * 

"continue" and have been previously interrupted. The printer position (stored by RJE) of 
the job will be moved ahead < + ) or bach (-) <integer> pages. If entry of this command 

causes the page number to be less than or equal to zero, RJE will continue printing at the 

beginning of the current backup file. If entry of the command causes page number to be 

greater than the number of pages in the current print file, RJE will resume printing at the 
next print file. 

For example, assume that file 001LINE of the following backup directory is being 
printed: 

545/563/000LINE 
545/563/001LINE 
545/573/000F 

If an interruption occurs and the page count is decreased to less less than or equal 

to zero via the *CE command, printing will resume at the beginning of 001LINE. If 

AUTOPRINT's page count is increased past the sire of 001LINE, printing will restart 
with 000F. 

Examples of the use of *CE are: 

*SP 

PRINT QUEUE 

C 545.2(ME 545/563 SAVE) FILE=000LINE(0) 

C 524 

# 
*CE 

C 545.2<ME 545/563 SAVE) FILE«545/563/000LINE( 1 ) 
*CE 545. 2 RESTART ,. „ 

545.2 (ME 545/563 SAVE) FILE-545/563/000LINE(2) 
*CE 545.2 CONTINUE _ , 

C 545.2(ME 545/563 SAVE) FILE=545/563/000LINE(3) 
»CE 545.2 C0PIES=5 SAVE=FALSE , _ ^„ w , 

C 545.2(ME 545/563 C0PIES=5) FILE«545/563/000LINE<4) COPY-1 
*CE 545.2 C0PIES=1 SAVE 

C 545.2(ME 545/563 SAVE) FILE=545/563/000LINE(5) 
*CE 524 

C 524 
»CE 524 RESTART 

524 
*CE 524 CONTINUE 

C 524 
«SP 

PRINT QUEUE 

C 545.21ME 545/563 SAVE) FILE-000LINE( 13) 

C 524 

# 

After a Halt/Load occurs: 
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*SP 

PRINT QUEUE 

C 545.2(ME 545/563 SAVE) FILE=000L1NE( 13) 

C 524 

*PB 524 

# 
*SP 

PRINT QUEUE 

C 524 

C 545.2(ME 545/563 SAVE) FILE=000LINE( 13) 

*CE 545.2 +3 

C 545.2(ME 545/563 SAVE) FILE=545/563/000LINE ( 16) 

Care should be taken when manipulating print queues to prevent the removal of files which 
are required for printing at some later lime. For example: 

*ME 545 

* 545.3 QUEUED (ME 545) 
•ME 545/563 SAVE 

# 545.4 QUEUED (ME 545/563 SAVE) 

If no other queue manipulation is done, then when 545.4 is about to be printed, AUTOPRINT 
will discover that there are no output files available to be printed, because 545.3 removed 
all the files under its directory, thus removing the files 545.4 would have printed. To 
avoid this situation, either 545.4 should have been entered before 545.3 or SAVE should 
have been specified for 545.3. With the appropriate *ME commands and the features provided 
for manipulation and interrogation of the print queue, there should never be a situation 
where the operator cannot prevent the unwanted removal of backup files. 

There is one very important point about the representation of printer position. Although 
communication to RJE is in terms of pages, what is stored internally is a backup record number. 
RJE uses approximating formulas which transform pages into backup records and vice versa. Page 
numbers are guides of where to start printing. RJE may not go back the exact number of pages 
or even start at the beginning of a page. Access could be given to the backup record number, 
but this is not natural and probably human transformation of pages and backup record numbers 
would be much less accurate than RJE's. 

D2426 RJE - DEVICE NOT READY ABORT "QT" OF PRINTER 

RJE will now QT any printer or punch file that is running to an output device that has been 
marked as permanently not ready (06 message from the remote site to the host MCS) , instead of 
assuming EOT and removing the files. 

D2431 RJE - IMPLEMENT "SF" AND "TF" ON A STATION BASIS 

RJE will now allow the characters-per-transmission blocking factor and buffer sire to be 
altered on a station-by-station basis. A station may set its blocking factor and buffer size 
by using the «SF and *TF RSC SPO command or the host site can do It with the SM commands SF and 

SM SF and TF Syntax: 

— <rje mix#> — SM — SF — <lsn> — <number>- 



I I 

I -<number>-| 



~<rje mix#> — SM — TF 



The SF SM command allows the selling of the values for a particular station (LSN) . The first 
number is the charac t er-per-lr ansm i ss i on blocking factor and the second is buffer size. 

The TF SM command displays the current values of Ihe char ac t er-per-lr ansm i ss i on and buffer size 
for all active RJE stations. 

There is no change to the syntax for the *SF and *TF commands at the remote site. 

D2489 RJE - "LOGON" SYNTAX CHANGES AND EXTENSION 

RJE will now allow LOGON in the same manner as CANDE. The USERCODE and PASSWORD may be entered 
on the same line with a "/" (slash) or a blank space between them. If the USERCODE and/or the 
PASSWORD are nol supplied. RJE will prompt with either "#ENTER USERCODE PLEASE." or »#ENTER 
PASSWORD PLEASE." 

The no password syntax Is indicated by the use of the "." (period) and optionally by 
"•NOPASSWORD" for remote terminals that use the "." as a control character (B700 series 
mach i nes) . 
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D2H-90 RJE - "*PER" IMPLEMENTATION 

RJE will now display the ready/nol ready sialus of a remote station's peripheral devices. This 
command will only report the status of devices that the remote processor reports to the host 
system (e.g., not all occurrances of devices going ready/not ready are reported for most RJE 
systems) . 



— *PER 



D2H91 RJE - "LOGON" WITHOUT "PASSWORD" ON "B700" SYSTEMS 

B700 series systems use the "." (period) as a system control character for their RJE firmware. 
This make it impossible to LOGON without a password using the CANDE syntax of "." meaning no 
password. RJE will now allow the following substitution at LOGON time: 

"•NOPASSWORD" in place of "." 

D2H92 RJE - BACKUP FILE ROUTING 

A new method of routing BACKUP files has been implemented. Needless AUTOBACKUP tasks when 
CANDE output is directed at an RJE remote site have been eliminated. 

D2504- RJE - "RSC" "TERM" DEFAULTS AND USE IMPLEMENTATION 

The NDL values of the R JE ' s RSC station for LINE WIDTH and PAGE SIZE(LINES) are now used as the 
default value settings. 

The RSC's ouput will not be affected by the setting of the TERM command's WIDTH value. This 
will allow the use of non-teletype type devices (72-char ac t er widths). 

Note: Some RJE terminals have RSCs with a greater width per line than their internal 
buffersize (B700 with TC^OOO as RSCS). Setting TERM WIDTH to greater than this 
buffersize will cause the first message greater than the buffersize to hang the remote 
terminal . 

D2529 RJE - RJELINKED FILE TITLE CHANGE 

RJE will now create its link file in the following manner: 

<mcs name>/LINKFILE. 

This will allow multiple copies of RJE (with different names) to run at the same time and not 
interfere with each other through their LINKFILEs. 

Example: 

SYSTEM/RJE will have the following linkfile title: 
SYSTEM/RJE/LINKFILE 

SYS/RJEXX will have the following linkfile title: 
SYS/RJEXX/LINKFILE 

D2560 RJE - '"STATUS" REPORT NO TASKS ACTIVE 

RJE will no longer report "NO TASKS ACTIVE" in response to a ""STATUS" RJE request when a WFL 
compiler is active. The mix number of the WFL compiler will now be displayed or "NO ACTIVE WFL 
TASK" will be reported. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
REMOTE JOB ENTRY 



P1D10 RJE - BLANK CARDS INSERTED INTO INPUT CARD DECKS 

RJE will no longer, under certain conditions, insert blank cards into input card decks. 

P1011 RJE - USERCODE ATTRIBUTES FOR "RJE" STATIONS 

RJE will now set all the necessary attributes for the processed task "WFLCOMPILER" . WFL no 
longer sets them for jobs run without a usercode and a LOGON SET TRUE RJE station. 

P1012 RJE - "INVALID INDEX" FOR >15 "BD" FILES 

RJE will no longer terminate with INVALID INDEX when more than 15 BD files are present for any 
one RJE station. 

P1013 RJE - "B6700" VS. "B7700" BACKUP HANDLING 

B6700 and B7700 R JE ' s will now agree as to the syntax of the *CE command. 

P1045 RJE - FAMILY ATTRIBUTE INCORRECT SYNTAX 

A usercode that does not have a FAMILY statement define in the USERDATAF1LE will no longer qet 
"FAMILY ATTRIBUTE INCORRECT SYNTAX" error messages when records are input at an RJE site with 
LOGON set. 

PI 075 RJE - EXTRA PAGE OF PAPER 

RJE will no longer skip out an extra page of paper: 

1. Before the EOJ banners. 

2. Between the job summary listing and any following BD file. 

PI 121 RJE - "REBUILDPRINTQUEUE BD" FILE CORRUPTION 

The RJE procedure REBUILDPRINTQUEUE will no longer corrupt BD files when a file with a 
LASTRECORD attribute of -lis found. 

PI 122 RJE - "INVALID INDEX" WITH ONE WORD MESSAGE 

RJE will no longer have its AUTOPUNCH task DS'ed with INVALID INDEX when processing a message 
ofoneword. 

PI 257 RJE - PRINTING JOBS WITH MORE THAN "100 BD" FILES 

RJE will now handling the printing of jobs that produce more than 100 BD files al one time. It 
should be noted that very large directories of BD files (e.g., REMLP<xx>) will cause a 
deceleration of RJE during print queue rebuild and insertion. 

P1303 RJE - "REMOTECONTROL" VS. "PRIMARYQUEUE" 

A timing window in RJE has been corrected which allowed a REMOTECONTROL printer/punch 
ready/notready message to be inserted into PRIMARYQUEUE instead of BACKUPUTILQ. This would 
cause either an INVALID INDEX in the OUTERBLOCK or a SE6 ARRAY ERROR in HANDLECARD INPUT . This 
has been corrected by checking for the messages as they are removed from PRIMARYQUEUE. 

P1304 RJE - "USER" OPTION FOR "WFL" SECURED READER 

The RJE option USER will now work correctly with II. 9 WFL. 

P1306 RJE - "RJELINKED" RECOVERY PROBLEM 

A possible problem when the RJELINKED file is used at recovery time has been corrected. The 
RJELINKED file is now zeroed al creation time. 

PI 424 RJE - "SYSTEM/BACKUP" VS. DISK OR PACK 

When SYSTEM/BACKUP is zipped <«SB, <mix#>HI, REMOTEPUNCH RESET) by RJE, the MCS will now first 
look for BACKUP on the family called DISK; if it does not find it on DISK or there is no family 
called DISK, it will then look on the family called PACK. If BACKUP is not found on DISK or 
PACK, an error message will be displayed to the requestor. 

This will correct the problem of RJE defaulting to DISK on systems that do not have DISK. 

Note: This change requires the use of II. 9 or later WFL. 
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Pl^B RJE - FOREIGN STATION TRANSFER 

RJE will now update its STATIONNAME array correctly when a station not belonging to RJE is 
transferred to it from another MCS . 

PI 531 RJE - LOSING BLANK CARD AT END OF BLOCK 

RJE will no longer lose a blank card of input when a single blank card (nonblank cards before 
and after it) falls at the end of a block during transfer to WFL . 

P1558 RJE - "WFL COMPILER" WITH NO "PRIORITY" 

RJE will now use the <mcs> priority *5 to fire off WFL COMPILERS when the following- are true: 

1. The station has LOGON set. 

2. The logged-on usercode has no PRIORITY (0) declared in the USERDATAFILE . 

o r 

1. The station has LOGON RESET. 

P1566 RJE - "DESTNAME" "NEQ" "RJE" TERMINAL PROCESSOR 

RJE will now handle CANDE and other tasks run outside of RJE which set DESNTAME to a member of 
the RJE station other than the processor. 

Note: This is not a recommended way of directing output to RJE. The correct method is to 
specify the RJE terminal processor station name in the DESTNAME attribute. 

P162M- RJE - "BREAK" ON "RJE RSC" 

RJE will now save the line when a BREAK is entered at an RSC, thus correcting a problem where 
messages could get out of sync due to bad ARM characters. 

P1B25 RJE - "FORMEDLP" ARRAY VS. "REMOTEPUNCH" 

The FORMEDLP array has been increased to correct an INVALID INDEX error. 

P1626 RJE - MISSING "SKIP" TO CHANNEL "1" 

RJE will now handle SKIPs to Channel 1 correctly, thus eliminating an overprinting problem when 
the SKIP is missed. 

P9D33 RJE - USERCODE ATTACHED TO CARD INPUT 

The usercode of the processor (RJE remote site) will be attached to all card decks that do not 
include a user's card. 

P9216 RJE - SUMMARY FILE PURGE BY *PB 

RJE will no longer allow the Summary file of another site to be purged by the input of a *PB 
< j o b summary>, since that summary file does not belong to the requesting site. 
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PI 165 ESPSIM - HANDLE "CANT-READ" CORRECTLY 

The ESP Simulator has been modified so that it will now correctly handle "UNDIGIT"; i.e., 
*+ " A " — ■+ "F " characters in the input string for a search function. Such undigil values would most 
likely be generated from CANT-READ characters in the original EBCDIC input. Previously, any 
attempt by the ESP Simulator to perform mask-type operations on such values would cause it to 
be DS'ed with an INVALID OP. It will now return a "NOT-FOUND" result instead, which is 
consistent with a SEARCH performed by a UCR. 
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DOCUMENT CHANGES NOTES (D NOTES) 
READER SORTER - MIL6700 



D2tl2 MIL6700 - IMPROVE DOLLAR OPTION HANDLING 

The compiler dollar option handling hat been improved io make it better able to handle 
unexpected and/or erroneous input. 
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PI 164 MIL6700 - REMOTE CYCLE AND VERSION 

The compiler will now display the correct mark, level and patch number on the term i na I . when run 
from remote. The patch number printed on the top of the output listing is also now correct. 

PI 188 MIL6700 - "INCLUDE" DOLLAR OPTION 

The INCLUDE dollar option has been changed to work the same as SCL. 

PI 189 MIL6700 - IMPLEMENT DOLLAR OPTION "VERSION" 

The VERSION compiler option has been implemented. When compiling with NEW set and a SVERSION 
card appears in the symbolic, if the patch deck contains a SVERSION card the new symbolic will 
be updated to the version and cycle on the last SVERSION card in the patch deck. 

The syntax is as follows: 
SVERSION VV.CCC.PPP 

where VV represents the version, CCC represents the cycle and PPP represents the patch. 
PI 190 MIL6700 - DELETE PROGRAMDUMP STATEMENT 

The compiler no longer produces progr amdumps when SSET DEBUG is true. 

P1E72 MIL6700 - LOGICAL EXPRESSIONS 

In an IF statement, when comparing the X register or Y register to a numeric, the only 
relations that are valid are the following: 

X EQL 

X NEQ 

Y EQL 

Y NEQ 
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PI 161 MILO - DELETE "10" COMPLETE TIMERS 

The UCR. DRIVER section of MILO will no longer produce a fatal RSP dump if a disk I/O takes 
longer than 1 second to complete, but it will now wait forever. The job of timing I/O's will 
be assumed by other code. 

PI 162 MILO - IMPLEMENT GENERAL "10" TIMERS 

MILO will now run timers on all RSP disk I/O operations. A fatal RSP dump will be produced if 
any single disk I/O takes longer than 10 seconds to complete. 

PI 163 MILO - REDUCE FLOW-STOPPED TIMERS 

MILO contains various timers which are invoked for a UCR which is getting ahead of one or more 
o.f its files. The length of these timers has been shortened. This should result in shorter 
Reader/Sorter pauses; it should also increase the speed with which a restart runs. 

PI 166 MILO - IMPROVE DISK "R.D." LOGGING 

MILO will now include the top 12 bits of the result descriptor (instead of the top 8 bits) in 
the disk error message passed to RSMONITOR. This will allow the TIMEOUT/EUBUSY bit to be 
logged as part of the disk error log entry. The RSLOG program has been changed accordingly. A 
problem where RSLOG would print out the wrong RSP number with the disk error printout has been 
corrected. 

PI 167 MILO - "ITEM-TYPE" IN "FLOW-STOPPED" SECTION 

The special register "ITEM-TYPE" may now be interrogated from within the FLOW-STOPPED section 
of a UCR. The value returned will have the same meaning as in the INVALID-ITEM section. This 
feature will enable the UCR to discover whether flow stopped as a result of the reading of a 
batch ticket. 

P1239 MILO - CONSOLE SWITCHES 

In order to facilitate testing and debugging of the RSP software, MILO has certain run-time 
options built into it, any one or more of which may be invoked by raising the appropriate 
switches on the front panel of the RSP. To help prevent accidental use of this feature, MILO 
will only examine the switches if the special code of oD» (4"D") is set up in the most 
significant hexade; I.e., the left-most four switches. The currently defined options are as 
f o 1 lows: 

D00001 MILO will immediately generate an error call, which will abort the operation of the 
RSP, and will cause a full RSP memory to be taken. 

D00002 MILO will generate and log a fake disk error, and will then abort. 

D00004 MILO will generate a fake queue handling error, by leaving a message in its input queue 
locked, and will then abort. 

D00008 MILO will attempt to force a fatal memory dump on the host system anytime that it 
aborts. 

D00010 MILO will generate an error call immediately when any running UCR aborts. This will 
abort the operation of the RSP, and will generate a full memory dump of the RSP. 

P1249 MILO - HANDSHAKE FAILURE 

The handshake procedure between B6700 and RSP has been changed. The RSP expected handshakes 
every 10 seconds from the B6700. If none arrived within that interval, RSP assumed B6700 had 
died and proceeded accordingly. There are times, however, when B6700 is busy and will not send 
handshakes that often; e.g., large file family rebuilding. 

RSP now accepts handshakes but does not assume the B6700 is dead just because no handshakes 
have been received. 

RSP also schedules handshakes to the B6700 every five seconds. Now RSP checks certain 
conditions, such as B6700 memory dump, before sending out the handshake. If these conditions 
are present, a handshake cannot be sent; instead, a null operation is sent through the BIC. 
This operation will detect a manual Halt/Load or general clear during these conditions, which 
will cause the RSP to breakout on its own and not wait forever to hear that the B6700 has 
resumed operation. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 READER SORTER - MILO 



PAGE 172 



HARK 3.0 
DOCUMENT CHANGES NOTES (D NOTES) 
READER SORTER - READERSORTER 



D24m READERSORTER - ADD "RSC-3" TEST NAME 

The nam* "RSC3MAINT" has bean added to the list of names which may be specified as test 
routines files to be loaded to an RSP. This is to allow the new system file 
SYSTEM/RS/RSC3MAINT to be loaded. This file is the test routine which will be used in 
conjunction with the RSC-3 Control and B9137 Reader/ Sorter. 
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READER SORTER - READERSORTER 

PI 035 READERSORTER - MODIFY "RSP DIED" RESULT DESCRIPTORS 

The format of ihe result descriptors generated by RSMONITOR in the case of RSP failure ("RSP 
HARDWARE ERROR") have been changed in accordance with the general changes made for the B6800. 
The result descriptors ■ill now contain a word count rather than an ending memory address. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 READER SORTER - READERSORTER 



PAGE 174 



MARK 3.0 
SOFTWARE IMPROVEMENTS NOTES (P NOTES) 



READER SORTER - RSLOG 



PI 169 RSLOG - CORRECT DATE PRINTOUT 

RSLOG will now print the correct tin* and date on the log output listing. 

PI 170 RSLOG - HANDLE MULT I -RECORD LOG ENTRIES 

RSLOG will now correctly handle multiple segment log entries. Previously, the continuation 
records of these types of log entries would be treated as potential RS log entries. This would 
occasionally lead to program errors, specifically in the TIME&DATE routines, as the program 
tried to analyze unrelated data. 
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PI 168 RSNETL - DECLARATION OF ZERO READER/SORTER 

RSNETL now generates an error Message when zero Reader/Sorters are declared In Reader/Sorter 
Network Language. This avoids possible problems when the RSNET file Is used. 
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D2412 SORTERCONTRL - IMPROVE DOLLAR OPTION HANDLING 

The compiler dollar option handling has boen Improved lo make 11 boiler able lo handle 
unexpected and/or erroneous input. 

D2413 SORTERCONTRL - ALLOW "PIC X" IN READER/SORTER RECORD 

The operation of the document scanner has been extended to allow for the specification of 
"PICTURE X" type items in Raader/Sor t er record descriptions. Any elementary item described 
with Ihis lype of picture will, when scanned ("touched"), be allowed to contain any combination 
of characters. However, as the Item is being scanned, a check will be made for can't-read 
characters, and the presence or absence of these will be used lo condition the "CANT-READ" flag 
for the item. This feature may be used, for example, for the following purposes: 

1. To check for the presence or absence of can't-read characters in a field whose actual length 
and/or layout is unknown. 

2. To verify the validity (for length and absence of can't-read characters) of a field whose 
length is known but whose layout is unknown. 

D2t57 SORTERCONTRL - CONDITIONAL "OMIT" 

The OMIT dollar option can now be conditionally set or reset based on the value of a Boolean 
expression, by use of the following type constructs: 

SET OMIT - <boolean exp> 
RESET OMIT - <boolean exp> 

This functions substantially as in ALGOL, except that the only valid operators are the 
following: "AND", "OR", "NOT". Parentheses may be used to override the usual order of 
precedence. * 

D2473 SORTERCONTRL - IMPLEMENT "MOVE LENGTH" 

The construct MOVE LENGTH is now implemented. 
D2H7H SORTERCONTRL - DOLLAR WARNING DEFAULT 

The default of the dollar card option WARNING has been changed from RESET lo SET. 
D2<+75 SORTERCONTRL - VOLUME/ SUBSET CRITERIA 

When compiling an end-point set, the end-point specification must initialize volume before 
subset criteria can be specified. 

D2181 SORTERCONTRL - BLACK BAND WARNING 

Current READERSORTER controls return the "BLACK BAND" (batch ticket) indication along with the 
actual document data itself. The RSP operating system uses this information to invoke a special 
routine within the UCR lo handle these types of items. Future READERSORTER controls will not 
return this indication until after the document has been processed, and flow is already 
stopped . 

In order to ensure functional compatibility between the old and new controls, the following 
changes will be made to the software:- 

(1) 

The special "BLACK BAND" section currently used for handling these items will be 
de i mp I erne n t e d . 

(2) 

Any black-banded item will be treated as a normal valid MICR item; i.e., it will invoke the 
MICR-ilem section. 

(3) 

After the black-banded item has been handled, the flow-stopped section will be invoked in 
the normal manner. 

ft) 

The use of the special register "ITEM-TYPE" will be extended lo allow its interrogation from 
the flow-stopped section, where it will report the black-band Indication (in the same manner 
as in the "INVALID ITEM" section), if a black-banded item was one of the reasons for 
stopping flow. 

These changes will be made with the III.l system Release. In order lo draw attention lo Ihis 
fact, the III.O Release of the SORTERCONTROL compiler will produce a warning message when it 
compiles any "USE FOR BLACK BAND" section in the UCR. This warning message may be suppressed 
by resetting the "WARNING" compiler dollar option. 
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P116H SORTERCONTRL - REMOTE CYCLE AND VERSION 

The compiler will now display the correct mark, level and patch number on the terminal when run 
from remote. The patch number printed on the top of the output listing is also now correct. 

P1250 SORTERCONTRL - PICTURE FOLLOWING "SIZE" 

It is now possible to declare a picture which is smaller than the preceding SIZE clause. 

The compiler also detects illegal filler constructs and generates an error message. 
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SCR 

02246 SCR - "B6800 MCP" 

New hardware interrupt literals are now recognized, and, where appropriate, logged. 

The format of log records reporting B6800 processor errors or diagnostic interrupts is as 
foil ows : 



lord 


Content 


.3 







Link 






1 


Date 






2 


Ti me 






3 


Type 


31; 


:16 - 2 (LOGMAJMAINT) 






15; 


16 - 15 CMLCONFIDENCEERROR) 


4 


MCP ID 


47: 


12 ■ System Ser i a 1 # 






35; 


12 - Mark Digit 






23; 


; 12 ■ Mark Level 



11:12 - Patch Level 

5 ProcessorlD, WH01 Value 

6 PI Parameter, PI Interrupt Parameter with Tag set to 

7 P3 Parameter, P3 Interrupt Parameter with Tag set to 

8 P2 Parameter Tag 

9 P2 Parameter, P2 Interrupt Parameter with Tag set to 

The interpretation of PI, P2 and P3 is based on B6800 processor specifications. 
D2539 SCR - "OPTIMIZER" OPTION REMOVED 
The MCP comp i I e-t i me option OPTIMIZER has beem removed from the MCP and Maintenance symbolics. 
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SCR 

PI 251 SCR - "SCR MARKNO III" 

The SCR MARKNO is now III in SCR printouts. 
PI 308 SCR - "TESTOP" RESULT FOR DISPLAY 

Type bits are now decoded properly in the TESTOP result for displays. 
PI 309 SCR - "TESTOP" SUBTYPE 

TESTOP now sets the proper unit subtype for MT and PK. 
P1310 SCR - RETURN "MPXIII" IN "UNITTYPE" 

The unit type is now handled correctly if the unit is a Model III Multiplexor. 
P1311 SCR - ALLOW "CONTBUF" READ ON "BX385" 

The CONTROLBUFFER variant is now allowed on READ on the BX385 controller. 

PI 426 SCR - DELETE "EXPERIMENTAL" OPTION 

The EXPERIMENTAL option, which prevented SCR symbolic update if EXPERIMENTAL was not set, has 
been deleted. 

PI 495 SCR - ALLOW TRAIN TABLE LOAD 

The train table now loads properly to train printers. 
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PHE7 SCTABLEGEN - REDUNDANT CHARACTER CORRECTION 
SCTABLEGEN will now correctly handle redundant character strings of more than 1 character. 
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SORT 

PI 398 SORT - "MERGE" VS. "UNITS-1" 

The ALGOL MERGE statement will now work in the case where the input files are 
character-oriented (UNITS'l). 
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P9303 SOURCENDL - MODIFICATIONS TO "TDBOO" REQUEST 

The SELECTTD800 request was discarding all NUL f+"00") characters In the text string and not 
transmitting them to the terminal. Since it is sometimes necessary to use NUL characters as 
padding after certain control sequences are sent to the terminal, all NUL characters will now 
be transmitted. the POLLTD800 request was treating the NOSPACE condition on execution of the 
GETSPACE statement the same as a transmission error and was reporting TERMINATE ERROR. That is 
different from the way other poll/select requests handle NOSPACE and is incompatible with the 
intended way new line CONTROL procedures operate. Accordingly, GETSPACE error handling for the 
TD800 was modified to make it compatible. 
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D2"+00 TABLEGEN - "TABLEGEN" NO LONGER HANDLES 



TABLEGEN no longer creates patches for the 
ALGOLTABLEGEN Is now used to create those patches 
how to use ALGOLTABLEGEN. 



ALGOL 

ALGOL 



compiler's internal array contents. 
See ALGOLTABLEGEN note D2tl8 for details on 
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D2266 WFL - LIMIT ON NESTED SUBROUTINE DECLARATIONS 

The WFL compiler will now limit the maximum number of nested subroutine declarations to ten. 
Ihere may be any number of non-nested subroutines. 

D2423 WFL - "AREASIZE" AND "BLOCKSIZE" ATTRIBUTES 

The AREASIZE and BLOCKSIZE for files built by the DECK statement in WFL have been changed: 

AREASIZE BLOCKSIZE 

BCL 1512 420 

EBCDIC 1008 420 

BINARY 756 480 

D2429 WFL - "NEW" WFL SYNTAX CLARIFICATION 

WFI T 8 r«iU3 no { es thit di8CUSS syntax refer to "new" II. 9.0 syntax as described in II. 9.0 WFL 
note 02077. Any other level of syntax will be explicitly described. 

D2433 WFL - "LINE INFO" FOR JOB CODE FILES 



e r 



Job code files now contain LINEINFO information relating code addresses back to the line numb=, 
shown in the WFL statement listing. The line number will be shown In the job summary for any 
WrL statement that causes the job to be abnormally terminated. 

D2434 WFL - CLEARING CARD READER IN USE BY "WFL" 

The WFL compiler will now terminate more cleanly when the card reader it is using is CLEAR'd by 
the operator. An error message will be generated and the WFL compilation aborted. The job 
summary for the job being read will be printed. 

D2449 WFL - EXPRESSIONS IN "COMPILE" STATEMENTS 

In all previous versions of the WFL language, expressions have been disallowed when specif vino 
either file or task attributes to the "compilee" in a COMPILE statement. 

It will now be possible to use expressions in these contexts (but not in pre-II.9 WFL syntax). 
These expressions will be evaluated prior to initiating the COMPILE and the obtained values 
will be stored in the code file (as if they had been specified as constants). 

Assigning a WFL global file to the "compilee" is still disallowed. 

Example: 

SUBROUTINE SUB (STRING S. REAL R) ; 
BEGIN 

COMPILE #S FORTRAN LIBRARY; 

FORTRAN FILE TAPE=SOURCE/#S; 

FORTRAN FILE CARD=PATCH/#S ON DISK: 

PRIORITY=R; 
END; 

SUB ("PRODI", 55); 
SUB ("PR0D2", 45); 

D2495 WFL - "SERRORLIMIT" OPTION 

The ERRORLIMIT dollar option allows control of the termination of a Job's compilation due to 
syntaxerrors. 

Syntax: 

— $ ERRORLIMIT — = — <integer constant) 1 

Compilation of the job will be terminated if the number of errors detected becomes greater than 
SqoS2 U , l ° *!"! < !\ le 9 er £?nstanl>. ^ no SERRORLIMIT card appears, the default error limit is 
aaaaa unless the job was STARTed through CANDE , in which case the default error limit is 10. 

As with other dollar option cards, the dollar sign may appear in column 1 or column 2 of the 
card 'mage. If the dollar sign is in column 2 and NEWSOURCE has been specified, that card 
image will be written out to the new source file; otherwise, it will not be written out. 

The dollar option card may not appear within internal data decks, as it will be treated as an 
inputdatarecord. 
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D251>+ WFL - PARAMETERS TO JOBS ALLOWED 

A WFL job may now have boolean, integer, real and string parameters. These parameters are 

declared in the BEGIN JOB statement. Page 8-H2 of the Work Flow Language Reference Manual 

(Form No. 5001555) describes the passing of actual parameters in START statements. The 

following describes their use in BEG I N JOB statements. 

The revised syntax for <job> on page 5-1 of the manual is as follows: 

<j ob> 

— <i> BEGIN JOB > 



. ___> 



|-<f i I e title)- 



•I 



I M I 

| — < j o b parameter I J s t > — I I — < j o b d i s p o s i t i on >- I 



I l<- 



I I 



| < j o b attribute specification >- 



i ! 

I — < i o b declaration statement list>-| 



-< statement list)- 



I 

I- <DECK statement) 

>- <i> END JOB 



The following syntax and semantics should be added to the description of JOB STRUCTURE on pages 
5-1 to 5-S of the manual. 

<job parameter list> 

V • ! 

— ( BOOLEAN — <boolean constant id>- 

INTEGER — <inleger constant id>- 

REAL — <real constant id> 

I- STRING — <string constant id) 



A <job parameter list> declares named constants (not variables) of the type specified in the 
parameter list. A named constant of the appropriate type may be used in any context where 
<boolean constant), <integer constant), <real constant) or <string constant) is allowed, 
including within the <job attribute specification). 

A WFL job with parameters that is presented to the system from any source that does not allow 
the actual parameters to be given (such as SITE or RJE readers, system SPOs or ZIP statements 
of the other programming languages) must be compiled for SYNTAX. If it is also compiled with 
the NEWSOURCE option, a START statement in a subsequent job from any source (including the 
START command in CANDE) can pass the proper parameters and start the job. 

The following replaces the example on page 5-3 of the manual. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 WORK FLOW LANGUAGE 



MARK 3.0 



Example of a Full Job 



<!> BEGIN JOB EXAMPLE (STRING TESTNAME, INTEGER TESTNUMBER) ; 
NAME=EXAMPLE/ #STR I NG( TESTNUMBER,*); 
USERCODE = WFL /MANUAL; 
CLASS = 2; 

TASK TCOMP, TRUN; 

COMPILE #(TESTNAME 8. STRINGtTESTNUMBER, * ) ) [ TRUN] PL/HTCOMPl; 

PL/ I DATA 

P: PROC; 

DCL I INITU5); 
DISPLAY CP IS RUNNING') ; 
DISPLAY CNOW ABORT*) ; 
1=1/0; 
END P; 
<i> IF TCOMP IS COMPILEDOK THEN 
DISPLAY "COMPILED OK" 
ELSE ABORT "*DID NOT COMPILE"; 
IF TRUN IS COMPLETEDOK THEN 

DISPLAY "RAN OK" 
ELSE ABORT "*RUN ABORTED"; 
<i> END JOB 

D2528 WFL - TASK ATTRIBUTE "LOCKED" 

LOCKED is a Boolean task attribute. It's value is not used by the MCP. The user may set it or 
read it at any lime for his own use. 

D2540 WFL - MULTIPLE FAMILY SPECIFICATIONS 

A job (or task) has only one family specification associated with it. As with other task 
attribute specifications, the occurrence of a second family specification Is syntactically 
correct; however, it overrides the first occurrence. 

D2541 WFL - STRING PRIMARIES IN FILE TITLES 

<string primary>s in <file title>s have not yet been implemented for <libmaint file list>s. 
D2542 WFL - MAXIMUM STRING CONSTANT LENGTH 

The Work Flow Language Reference Manual (Form 5001555), page 2-8. states that 80 characters is 
the maximum length of a string constant. It should be corrected to state that 256 characters 
is the maximum length. 

The string constant may not be broken across a card boundary; therefore, for most cases. the 
actual maximum length is smaller than 256. 

D2543 WFL - USE OF THE ""STRING" FUNCTION 

The Work Flow Language Reference Manual (Form 5001555) should state that the STRING function 
returns the rightmost characters if the integer being converted to a string has more characters 
than the length specified. 

The following sentence should be added to the description of the STRING function on page 4-10 
ofthe manual: p»»» 

"If the value of the second <integer expression) is less than the number of characters needed 
to represent the first <mleger expression), the rightmost characters are returned." 

The following example should be added: 

STR1:-STRING( 1234,3); Result - "234" 
D2586 WFL - TEST FOR "WFL" DATA DECKS BEING RESIDENT 
Jesuit? f( "" * dat " d,Cl< b * in9 RESIDENT (or RESENT in pre-II.9 WFL) will now give correct 

The following example indicates how to test for a data deck being RESIDENT: 

<I> BEGIN JOB RESIDENT/EXAMPLE; 
DATA X 

<I> 

FILE XF ( K I ND-READER , T I TLE=X ) j 

IF XF IS RESIDENT THEN; X "XF IS RESIDENT" WILL BE TRUE 

IF FILE X IS RESIDENT THEN; X "FILE X IS RESIDENT" REALLY 

* MEANS "FILE X ON DISK IS 

X RESIDENT", WHICH WILL 

X PROBABLY BE FALSE 
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<I> END JOB 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
WORK FLOW LANGUAGE 



PI 046 WFL - EXPLICIT LOOPS AROUND "COMPILE" STATEMENTS 

The WFL compiler will now properly pass the SEGZERO parameter to compilers invoked via the 

COMPILE or BIND statement. The effect of this Is that, if the COMPILE statement is coded 

within a loop, the attribute equation information will properly be passed on to all programs 
compiled, rather than only the first. 

Partial Job Examp I e : 

REAL I; 

LOOP: COMPILE X FORTRAN; 

FILE FILE5-P ON DISK; 

FORTRAN DATA 

? I:=I+i; 

IF I LSS 5 THEN GO LOOP; 

Previously, the equation for FILE5 was only passed to the first compilation of program X. Now 
it will be passed to all 5 compilations of X. 

PI 047 WFL - GENERATE ERROR FOR BAD "KIND" SPECIFICATION 

The WFL compiler was not properly generating syntax errors for erroneous KIND values when these 
KIND values were not preceded by an explicit KIND-. File equations such as "FILE X (PRINTER 
BACKUP TAPE)" were being allowed (although the resulting KIND was TAPE). 

The WFL compiler will now properly note this as an error. 

PI 048 WFL - "WFL" ABORTS FOR EXTREMELY LARGE JOBS 

The WFL compiler will no longer terminate with a SEG ARRAY error when presented with an 
e x .i£ 8 3Sj.Z J.? r it* ^L J° b - The WFL - compiler will now detect this situation and issue the messaae 
"JOB CODE FILE CAPACITY EXCEEDED". 9 

PI 049 WFL - STRING EXPRESSIONS IN "ON" STATEMENTS 

The WFL compiler will now properly generate expression temporaries for string expressions that 
occur within the body of an ON statement. 

PI 050 WFL - HANDLING OF "KIND" LISTS IN "OLD" "WFL" 
KIND lists containing BACKUP following an OR will now generate the correct KIND speflciation. 
Examp I e : 

KIND-PRINTER OR BACKUP PETAPE 

Previously, this would result in a KIND of PETAPE. The proper kind is now generated (PRINTER). 
Note that this syntax is valid only for "old WFL" syntax. 

Also, KIND lists containing either of the mnemonics PRINTER or PUNCH immediately following the 
token OR were being issued erroneous syntax errors by the II. 9.0 system release WFL. This has 
been corrected. 

P1051 WFL - "DATA" OR "END" WITHIN FILE NAMES 

The WFL compiler will no longer be sensitive to the tokens DATA or END when they occur within 
file names. The WFL compiler would previously become confused if one of these tokens 
immediately followed the usercode part In an otherwise valid file name. 

The following example will now compile correctly: 
C0PY'a,B.(C)DATA/E TO T; 

PI 052 WFL - HANDLING OF MISSING "?END JOB" CARD 

The WFL compiler will again properly abort the compilation of a job when It encounters the 
beginning of the next job (i.e.. the ?END JOB card is missing). This feature existed prior to 
the 11.9.0 system release. 
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PI 064 WFL - IMPROVE HANDLING END OF FILE 

The WFL compiler no* behaves more sensibly upon reaching End Of File on a disk file (from ZIP 
with file or CANDE start) . 

An UNEXPECTED END OF FILE message will not be produced if either: 

a. The job was being "flushed" because of a severe error message, or 

b. The compiler was skipping blank cards following the last job in the file. 
PI 065 WFL - SINGLE "START" STATEMENT 

The WFL compiler will now properly handle a START statement when that s t a t eme n V was the only 
statement in the job. Previously, the WFL compiler would fault terminate for INVALID OP. 

PI 066 WFL - LONG "COPY" STATEMENTS 

The WFL compiler would terminate for INVALID INDEX or STRING PROTECT when presented with a COPY 
statement containing more than (approximately) 150 file names. 

This problem has been corrected; very long COPY statements are now allowed, just as in pre-II.9 
WFL. 

PI 067 WFL - ELIMINATE "WFL" ABORT ON BAD FILE SYNTAX 

The WFL compiler was aborting for INVALID INDEX for the following: 

COMPILE X FORTRAN; 

FORTRAN FILE CODE (* SECURITYTYPE=PUBLIC) ; XThere should be a comma 

^following the asterisk 

COPY Y TO TAPEY; *WFL aborted here 

The WFL compiler will now give the correct error message for the bad file specification and 
will no longer abort on the COPY statement. 

P1068 WFL - INFINITE LOOP FOLLOWING SECURITY ERRORS 

The WFL compiler will now issue an "UNEXPECTED END OF FILE" message if it detects a security 
error while reading a disk file. Such a situation occurs by using certain combinations of 
changing a lasks's usercode and performing ZIP WITH FILE statements. 

Previously, the WFL compiler would loop issuing a "COMPILATION ABORTED" message. 
P1376 WFL - ERRORS IN DECLARATIONS 

WFL is now able to properly handle errors in declarations. 
PI 485 WFL - BOOLEAN CONSTANT EVALUATION 

WFL was not evaluating the following expressions correctly: 

TRUE OR TRUE 
TRUE AND TRUE 
TRUE EVQ TRU 

They now give the expected results. 
PI 488 WFL - SINGLE BLANK CHARACTER STRING CONSTANTS 

WFL now handles a string constant that is a single blank character. 
P1489 WFL - CORRECT "HEX" FUNCTION 

The HEX siring conversion function incorrectly converted hex i dec i ma I strings containing "A" 
through "F". This has been corrected. 

PI 658 WFL - BACKWARD BRANCHES IN "ON" STATEMENTS 

Incorrect code is not longer generated when an ON statement does a GO TO to a label that 
occurred before the ON statement. 

PI 660 WFL - "$ INCLUDE" WITH "NEWSOURCE" OR "LIBRARY" 

When doing a WFL compile with NEWSOURCE or to LIBRARY, SINCLUDE now works as documented. If 

the doll.? sign is in column I, the included text, but not the dollar card, I. «r i I ten t o d i ,k 

If the dollar sign is in column 2, the dollar card, but not the included text, is written to 



disk, 
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Previously neither the included text nor the dollar card was written to disk if the dollar 

do?l , ar W s1 9 n'wa: !n Um c , oLn B a! h ^ inC ' Uded teXl '" d lh ' d ° Mar '"' "" "'»•" l ° d >»" ■' "" 
P9131 WFL - "WFL" TERMINATION IF "DS" WHILE SCHEDULED 

I^Ds-ed^^i^strM'schrdiu::" 318 cleanly if a ZIP sUlemen * <•««.«*- » ••■• «» p- 9f a„ 

Previously, the WFL compiler would issue two messages "WFLCODE REQUIRES MT7 #1"; this no lonaer 
occurs* ** 

P9132 WFL - ERROR FOR MISSING "UNTIL" 

UR S!-![ ,l, °Ti. r a " err ° r messa ? e for a """'"9 UNTIL in a DO statement was lost for the II 9 
WrL syntax. That error message has been restored. 

P9133 WFL - ELIMINATE "INVALID INDEX" ON "WFL" ABORTS 

The WFL compiler would terminate for INVALID INDEX if there were a fatal syntax error in th. 
job heading and t he DISKL IMI T or TASKLIMIT job attributes had b en P f e^ Th rm at on 
should 6 have bee'n " fa3h '° n lhal a job p r ! n 4 ° u * tfould never be routed to an RJE station as a 

This problem has been corrected; now, the WFL compiler will not fault in this situation and the 
syntax error listing will be routed to the appropriate destination. 

P913H WFL - PROPER INFORMATION FOR LONG "COPY" STATEMENTS 
R^SurifilrtrViBRARY/'MAfNTEAANC?.' 1B " bU " ,ld (r8th6r lh ' n ° n " the '" 13 bils > in tha 

lM:w: ! :!thiurterm;na(in 9 ai ?or n iNVALID HdIx? ' » ^^"^ ^ " r » '° n9 C ° PY •'•*•■•"*• that WFL 
P9135 WFL - PERFORM JOB ROLLOUT IN MORE INSTANCES 
The WFL compiler will now mark in a few more instances jobs that have no active tasks. 
The^following jobs will be marked as having no active tasks, if the job has no active tasks and 

1. Attempts to open a file, or 

B. Waits for an operator OK, or 

3. Executes the ACCEPT function, or 

t. Finishes execution of any WAIT statement, or 

5. Exits from a subroutine, or 

6. Finishes all tasks and attempts to go to EOJ. 

This means that should a system Halt/Load occur during any of the above situations the 
preceding task will not be restarted (the job will restart at on. of the above places)! 

P9159 WFL - INFORMATION CARRY OVER 

iL l "'2.^? P I.!- atemenU ,!i S * d lh8 S4me lask identifiers, various information about the sources 
second C (erroneously) be carried over from the first COPY statement to the 

The following example would copy Y from the pack named P: 

COPY X FROM P(PACK) TO DISKtTl; 
COPY Y FROM PACK TO DISK[T]; 

Inio S rm.^:rbi':.L"£oPY r s r :.t: d ,n:s e l " 9k "" nlifi " * I " "• '•"■" — y — e or destination 
P9247 WFL - "DECK STATEMENT" 
The WFL compiler will now properly handle the new DECK statement syntax. 

? DECK < f i I e t i 1 1 e > 
? DATA 

Jx , |i l cit e NAMi:! ,r "'" " S0 correcll >' hand,e DECK «*«l«t»t. in WFL jobs that do not have an 

? BEGIN JOB 
? USER - X/Y 
? DECK 
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On the II. 9 Release, both of these situations failed to lock a created disk file. 
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DOCUMENT CHANGES NOTES (D NOTES) 
XREF ANALYZER 



D2526 XREFANALY - CHANGE "INTERACTIVEXREF" FILE TITLES 

The format of Ihe titles of the files generated for INTERACTIVEXREF has been chanqed to the 

following: " 

<usercode>XREFFILES/<codef i I e till e>/DECS 
<u sere ode >XREFFILES/<codef i le lit le>/REFS 

D2527 XREFANALY - VERSIONS FOR "INTERACTIVEXREF" FILES 

Version information is now included in the XREFFILES. INTERACTIVEXREF checks the compatibility 
of the XREFFILES and displays an appropriate error message if the XREFFILES were created with 
an incompatible XREFANALYZER. 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 XREF ANALYZER 



PAGE 193 
MARK 3.D 



SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
XREF ANALYZER 



P1H-29 XREFANALY - CORRECTION DECLARATION COUNT 

An XREF of a symbolic which does a LOADINFO will now produce a correct count of the number of 
declarations. The incorrect count previously generated would result in an "EOF NO LABEL error 
when attempting to generate INTERACTl VEXREF files. 

P16H-7 XREFANALY - CORRECT "XREF" OF LARGE PROGRAMS 

The XREFANALYZER will now handle very large programs without errors. Several fields have been 
increased to allow the storage of more information. 
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SYSTEST - B6800MDL/TAPEHANDLER 

PI 270 TAPEHANDLER - LIST CARD ASSEMBLY PART NUMBER 

The system now lists card assembly pari numbers correctly. 
P1440 TAPEHANDLER - DELETED "FAMILY" STATEMENTS 

TASt-uJMn.'^D SUlement " FAMILY DISK=<storage device family name>" has been deleted from 
AKtHANULLR ; consequently, job decks must be created with proper and correct family statements 
in order to run TAPEHANDLER. 

P144B TAPEHANDLER - NEW DATA FILE TITLE = OLD FILE TITLE 

If TAPEHANDLER is asked to update a promwriler tape and the system crashes before the task is 

t^e^PROMWR?TER?ME^ ° n ^ f " e WUh lhe ''"'"*» "'" " NEW " »" d 

Specifications for areasize and areas file attributes have been added to the declaration for 
file "NEW" so that the old copy of the file will not be used on restart; this old file will be 
removed when the final execution of the program locks the "new" file. 

The areas (=5) and areasize ('WO records/area) are such that (1) a record of maxrecsize 149 
words is never split across an area boundary, and (2) the file is large enough to hold the 
equivalent of a full 2400-foot reel of unblocked records when written at 2600 bits/inch with 
3/4- inch IRG. 

Blocksize of 149 X 30 = 4470 words is also specified. Areasize is also an integral multiple of 
the areasize for ALGOL symbolic files. 

PI 677 TAPEHANDLER - MAINTENANCE KIT RELEASE VERSION 

Several new features have been added for the latest B6B00 Maintenance Kit. 

PI 704 TAPEHANDLER - UPDATE COMMENTS IN SYMBOLIC 

All the jab deck examples in the comments section of the TAPEHANDLER symbolic have been updated 
to reflect the changes made to TAPEHANDLER. 
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DOCUMENT CHANGES NOTES (D NOTES) 
SYSTEST - DCP/MAINTMCS 



D2H79 MAINTMCS - DATACOM-TO-DISK SYNTAX 

The DISKTEST EU command is used to designate the diskfile electronics unit (1C3 disk) where a 
file will be created for use in testing d a t acom-t o-d i sk controls (DCDC). This command must 
have been completed prior to running DCDC test 10 (i.e., TESTF 1LE=SYSTEST/DCP/DCDC) . The 
"DISK" specification with a "DCPTEST" command will cause the file address, including 
electronics unit (EU), of the current disk file to be passed to the DCP when initiating a given 
test. The "DISK" specification is required for any selection which includes DCDC test 10 (and 
ignored by other DCP tests). 

The following example will cause MAINTMCS to create a special test file on EU32 (if EU32 is 1C3 
type disk). Tests 0-10 of SYSTEST/DCP/DCDC will each be passed the address of the file. 

<mixno> SM DISKTEST EU=32 

<mi;<no> SM TESTFILE=SYSTEST/DCP/DCDC 

<mixno> SM DCPTEST DCP=0 , TEST=0-10, T1MEOUT = 3600 , DISK; STATUS 

D24-80 MAINTMCS - "CANCEL" COMMAND FOR "DCPTEST" 

The CANCEL command may be used to discontinue a DCP test if one is in progress, and to 
eliminate unwanted tests which have been queued. If a test has timed out and is awaiting "AX 
OK " , " AC CANCEL " nay be used Instead. 

The CANCEL command may be entered via card when initialing MAINTMCS or at any lime when 
MAINTMCS is running via an "SM" from the operalor display terminal. The following example 
shows a CANCEL followed by another command: 

<mix no> SM CANCEL; DCPTEST DCP=0 , TEST=3-5, REPEAT=100 

D2582 MAINTMCS - FRONT-END-CONTROL SELECTION 

The "DCPTEST" synlax lest specification list will now allow a selection of front-end-control 
adapter address (i.e., basic control number and position within the basic control), AA, to be 
passed to the DCP as a parameter with the code file of the next test specified. (AA will be 
ignored by the next test specified if AA is not needed.) 

Ex amp I e : 

<mixno>SM DCPTEST DCP=2 ,TEST=(AA3: 1 )H-B, (AAO :2) 0-8. 10 

This example will cause DCP 2 to be selected, and would run tests 4 through 6 using the 
front-end-control in position 1 of basic control 3. It would then run tests through 8 and 10 
using the front-end-control in position 2 of basic control 0. 

Additional parameters allow specification of disk electronics units (EU) or storage units (SU) 
for use with SYSTEST/DCP/DCDC. 

Ex amp I e : 

<mixno> DCPTEST DCP=0 , TEST=( AAO : ,EU31 ,SU0) 0-9, (DISK) 10-1 1 
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SYSTEST - DCP/MAINTMCS 



P1271 MAINTMCS - IMPROPER TEST NUMBER SELECTION 

Using DCPTEST syntax. Hie first test number of 
ignored under certain conditions. This would 
of the first test of the range. This has been corrected 



a range of tests to be executed was being 
typically cause "TEST 0" to be executed in place 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - IO/10P 



PI 118 10IOP - ACCELERATE DATA COMPARE 
Oaia compare has been accelerated. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/CPU 



P1377 CPU - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEQ 
NEQ 

* 

P1703 CPU - "OFFLINE" DOLLAR OPTION 

The OFFLINE dollar option has been added, which forces the value array "DATAARRAY" to be a 
"SAVE" array. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/DFO 



P1377 DFO - REMOVE "BCL" CHARACTERS 
BCL characters are no longer used for the following: 

GEQ 

LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/MPX 



PI 377 MPX - REMOVE "BCL" CHARACTERS 
BCL characters are no longer used for the following: 

GEQ 

LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/PEP 

PI 138 PEP - LOAD TRAIN TABLES 

All the train tables contained in LTTABLEGEN can now be loaded. 
PI 260 PEP - CODE SPACE IN "SEG1" 

More code apace has been made in SEG1 for program code. 
PI 261 PEP - "READ EXTENDED RD OPTION" 

READ EXTENDED RD OPTION has been added to the error options on flexible disk. 
PI 262 PEP - RUN WITH "PASS" SET 

Run of test cases with PASS set has been corrected. 
PI 263 PEP - PERIPHERAL UNIT SEARCH 

Disk pack type 235 is now found correctly in a peripheral unit search. 
PI 377 PEP - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEQ 
NEQ 

* 

P1670 PEP - "64" MEMORY MODULES 

The system no longer hangs in a memory search loop if 64 memory modules are present. 

PI 671 PEP - CHANGE PRINTER AND DISPLAY MESSAGES 

The printer and display messages have been changed to print PK3 instead of PK2 when disk pack 
c35 testcasesarerun. 

PI 672 PEP - SPECIFIED AND NONSPECIFIED TRAIN TABLES LOADED 

Train tables are now loaded correctly when specified (by user display message) and when not 
specif! ed (use testop train id). 

PI 673 PEP - MULTIPLE PROCESSORS INITIALIZE 

Non-halt -load processors now initialize correctly on a multiple processor system. 

PI 674 PEP - INDICATE "PK2" TEST CASE MODIFIED 

When a disk pack type 235 (PK3) test case error occurs, the system now indicates that the PK2 
test cases are modified for PK3 at execution time. 

PI 675 PEP - NO "PB MAE" TEST IF "MM63" IS PRESENT 

The pseudo-busy (PB) memory address error (MAE) test in SYSCON is now skipped if memory module 
63 is present. 

PI 676 PEP - MAKE "RUNHCT" RUN IN CONTROL STATE 

RUNHCT now runs in control state so that predicted result descriptors are correct on error 
retry. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/DISK 



PI 1 17 DSK - TITLE CHANGE 



The title SYMTEST/OFF/DISK and SYSTEST/OFF/DISK has been changed In the symbolic file and the 
SYSTESTS tape to SYMTEST/OFF/DSK and SYSTEST/OFF/DSK, respectively. 

PI 377 DSK - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/ TAPE 



PI 116 TPE - TITLE CHANGE 



The title SYMTEST/OFF/TAPE and SYSTEST/OFF/TAPE has been changed in the symbolic file and the 
SYSTESTS tap* to SYMTEST/OFF/TPE and SYSTEST/OFF/TPE. respectively. 

PI 377 TPE - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/DISKEX 



PI 377 DISKEX - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEO. 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/MEMORY 



PI 377 MEMORY - REMOVE "BCL" CHARACTERS 

BCL characters are no longer used for the following: 

GEQ 
LEO 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/MEMREQ 



PI 377 MEMREQ - REMOVE "BCL" CHARACTERS 

BCL characters art no longer used for the following: 

GEQ 
LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/DFOSUTEST 



PI 377 DFOSUTEST - REMOVE "BCL" CHARACTERS 
BCL characters are no longer used for the following! 

GEQ 

LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - OFF/TIMERTEST 



PI 377 TIMERTEST - REMOVE "BCL" CHARACTERS 
BCL characters are no longer used for the following: 

GEQ 

LEQ 
NEQ 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKXD 



Pm2 PKXD - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles new eonlrolware (2.0 or laier) and disk ptclt type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKOH 



P14H2 PK04 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system no* properly handles new controliari (2.0 or laier) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK05 



PI 442 PK05 - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK06 



P14«t2 PK06 - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles ne* control t«ne (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK07 



P1W2 PK07 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES CP NOTES) 
SYSTEST - SCR/PK08 



P1W2 PK08 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or laler) and disk pack lype 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK09 



Pm42 PK09 - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK10 



Pma PK10 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and dish pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK11 



P1HH2 PK11 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK15 



PI ^42 PK15 - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PK16 



P1H42 PK16 - NEW CONTROLWARE , DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC01 



PI 227 SC01 - "TD830" AND "B7700" UPDATE 

MATH has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to dd/UU/d / /UU . 



B7700/B6700 MARK 3.0 RELEASE 7 JUNE 1978 SYSTEST - SCR/SCO 1 



PAGE SSI 
MARK 3.0 

SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC02 

P1S27 SC02 - "TD830" AND "B7700" UPDATE 

MATH has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC03 



P1227 SC03 - "TDB30" AND "B7700" UPDATE 

MATH has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC04 



PI 227 SC04 - "TD830" AND "B7700" UPDATE 

MATH has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC05 



PI 227 SC05 - "TD830" AND "B7700" UPDATE 

MATH has been updated to pun on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC06 

P1227 SC06 - "TD830" AND "B7700" UPDATE 
MATH has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC07 



P1227 SC07 - "TD830" AND "B7700" UPDATE 
chInge5 a u b B6700/ P B7700. l ° '"" "" T ° 83 ° d!SP ' 8y " "' " " TD8 °° 8nd BIDS - The *'*'• has been 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC08 



P1227 SC08 - "TD830" AND "B7700" UPDATE 

MATH has^ been updated lo run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC09 



P1227 SC09 - "TD830" AND "B7700" UPDATE 

MATII has been updated to run on TD830 display as well as TD800 and BIDS. The title has beer 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

SYSTEST - SCR/SC10 

P1227 SC10 - "TD830" AND "B77CJ0" UPDATE 

MATII has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SCI 1 



P1227 SC11 - "TD830" AND "B7700" UPDATE 

MATII has been updated lo run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SC12 



P1227 SC12 - "TD830" AND "B7700" UPDATE 

MATII has been updated to run on TD830 display as well as TD800 and BIDS. The title has been 
changed to B6700/B7700 . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/CONFIG 



PI 265 SCRCONFIG - ADD CONTROLWARE LEVEL 

The controlware level has been added to the printout and MPXIII handling, 
PI 267 SCRCONFIG - ADD "DPK235" 

The system can now run with 235 and/ or 225 disk packs. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKDUMP 



PI ^42 PKDUMP - NEW CONTROLWARE. DISK PACK TYPE "235" 
The systea now properly handles new controlware (2.0 or later) and disk pack lype 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKSCAN 



PI 26i+ PKSCAN - FAULT PRINTOUT 

The fault printout has been expanded to 6 hex digits. 
PI 265 PKSCAN - ADD CONTROLWARE LEVEL 

The controlware level has been added to the printout and MPXI I I hand I In; 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKSEEK 

PlHt2 PKSEEK - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKBASIC 



Pl«+42 PKBASIC - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/SUPERIV 



PI 265 SUPER IV - ADD CONTROLWARE LEVEL 

The controlware level has been added to the printout and MPXIII handling. 

PI 436 SUPER IV - ERROR RETRY FOR NEW CONTROLWARE 

Error retry for the new controlware now checks the balance of the cylinder with reads instead 
of verifying by track. 

P1H37 SUPER IV - BALANCE OF TRACK READ LENGTH 

The balance of track read length Is now less than or equal to track length. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKHDOVER 



PI "+42 PKHDOVER - NEW CONTROLWARE. DISK PACK TYPE "235" 
The system now properly handles new controlware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKINTERCH 



Plt42 PKINTERCH - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new con t r o I war e (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKACTUATOR 



PlHtE PKACTUATOR - NEW CONTROLWARE. DISK PACK TYPE "E35" 
The system now properly handles new controlware (5.0 or later) and dish pack type 535. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKHEADISOL - 



Pitta PKHEADISOL - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new conlrolware (2.0 or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/PKWRITEREAD 



P14t2 PKWRITEREAD - NEW CONTROLWARE, DISK PACK TYPE "235" 
The system now properly handles new conlrolware (2.D or later) and disk pack type 235. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/TP72 



P1496 TP72 - "SCR" TESTS FOR TRAIN PRINTERS 

SCR tests have been implemented for the following train printers: 

TP7S EBCDIC72 (1100 LPM) 
TP9BF EBCDIC96 (1100 LPM) 
TP64 EBCDIC64 (450/750 LPM) 
TP64A EBCDIC64A (450/750 LPM) 
TP96S EBCDIC96 (450/750 LPM) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/TP96F 



PI 496 TP96F - "SCR" TESTS FOR TRAIN PRINTERS 

SCR tests have been implemented for the following train printers: 

TP72 EBCDIC72 (1100 LPM) 
TP96F EBCDIC96 (1100 LPM) 
TP64 EBCDIC64 (450/750 LPM) 
TP64A EBCDIC64A (450/750 LPM) 
TP96S EBCDIC96 (450/750 LPM) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/TP64 



P1496 TP64 - "SCR" TESTS FOR TRAIN PRINTERS 

SCR tests have been Implemented for the following train printers: 

TP72 EBCDIC7E (1100 LPM) 

TP96F EBCDIC96 (1100 LPM) 

TP64 EBCDIC64 (450/750 LPM) 

TP64A EBCDIC64A (450/750 LPM) 

TP96S EBCDIC96 (450/750 LPM) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/TPBHA 



P1496 TP6tA - "SCR" TESTS FOR TRAIN PRINTERS 

SCR tests have been implemented for the following train printers: 

TP72 EBCDIC72 (1100 LPM) 

TP96F EBCDIC96 (1100 LPM) 

TPBH EBCDIC6H- C+50/750 LPM) 

TPB'+A EBCDIC61A (150/750 LPM) 

TP9BS EBCDIC96 (150/750 LPM) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/TP96S 



PI 496 TP96S - "SCR" TESTS FOR TRAIN PRINTERS 

SCR test:!> have been implemented for the following train printers: 

TP72 EBCDIC72 (1100 LPM) 

TP96F EBCDIC96 (1100 LPM) 

TP64 EBCDIC64 ("+50/750 LPM) 

TP64A EBCD1C64A (450/750 LPM) 

TP96S EBCDIC96 (450/750 LPM) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/DKADDR 



PI 119 DKADDR - DISK PACK TYPE "235" 
Printing of cylinder-head start addresses for disk pack type 235 has been added. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/LOGMAPPER 



PI 115 LOGMAPPER - "SPO" INPUT ERROR MESSAGES 

SPO input errors messages were written to the printer rather than the SPO. This has been 
corrected. 

P1228 LOGMAPPER - "TODAY FOR LAST NN WEEKS" 

The following changes have been made. 

1. Allow AX message of "TODAY FOR LAST NN WEEKS" as well as "MM/DD/YY FOR LAST NN WEEKS". 

2. SEG ARRAY on numeric dale search has been corrected. 

3. Fault on <month> <1 or >12 has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/PKTEST 



PI 669 PKTEST - RUN ON "BX385-a35" 
PKTEsfl25 m to°PKTEST rU " S °" BX385 ~ 235 disk P acl < s - The program name has been changed from 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/PKTEST225 



PH39 PKTEST225 - "B6800" COMPATIBLE "RD" 

BB800 compatible result descriptors are now handled properly; i.e., word and character count 
instead of end memory address. 

The program name has been changed from PKTEST225 to PKTEST . 

PI 140 PKTEST225 - "AX" "SPOTAB" FOR "TD830" DISPLAY 

The SPO report message to the TD830 display has been corrected by adding ETX at the end of the 
screen to the message. 

The program name has been changed from PKTEST225 to PKTEST. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/RESHELPER 

PI 266 RESHELPER - ADD "TD830" DISPLAY AND "DPK235" 
The system can now run with TD830 display and 235 disk packs. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/LOGSTRIPPER 



PI 114 LOGSTRIPPER - FILE ADDED, DUPLICATE IDENTIFIER 
The file LOCK MAINTHISTORY has been added. 

The identifier MLLIBERR is defined in LOGSTRIPPER and also included in JOBFORMATTER, causing a 
compile error. This duplication has been corrected. 
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FTR ACTION TABLE 

FTR NOTE SOFTWARE 

008-0003 P1S90 FILECOPY 
009-0010 P1615 INQ 
009-0010 P1615 INQ 
016-9009 P1650 COBOL 
018-0007 D2586 MCP 
018-0007 D2586 WFL 
021-0008 P1508 FILECOPY 
042-0001 P1290 FILECOPY 
042-0007 P1667 MCP 
04-2-0008 P1011 RJE 
042-0008 P1558 RJE 
042-0008 P1011 RJE 
042-0008 P1558 RJE 
042-0008 P1011 WFL 
042-0011 P1B26 RJE 
049-0002 P1641 COBOL 
049-0004 P1626 RJE 
050-0001 P1580 LOGANALY 
050-0004 P1531 RJE 
050-0005 P1626 RJE 
050-0007 P1624 RJE 
050-0008 P1625 RJE 
052-0002 P1B46 LOGGER 
060-7129 P1467 PLI 
060-7147 P9073 ACR 
060-7150 P1063 REORG 
060-7152 D2267 CONTROLLER 
060-7152 D2267 FILECOPY 
060-7152 02267 FILEDATA 
060-7152 D2267 LOGANALY 
060-7152 D2267 LOGGER 
095-0001 P1445 RECOVERY 
095-0005 P1559 MCP 
095-0006 P1454 MCP 
095-0007 PI 121 RJE 
095-0009 P1596 LOADDUMP 
106-1057 P1041 PLI 
106-1064 P1071 ACR 
113-0871 P9101 ALGOL 
113-0876 P9088 DASDL 
113-0878 P1640 BACKUP 
113-0889 P1521 ACR 
113-0889 PI 521 RECOVERY 
113-0893 PI 481 ALGOL 
114-1031 P1500 CANOE 
116-0107 P1056 NDL 
120-0012 P9101 ALGOL 
120-0165 P1421 ESPOLINTRN 
120-0170 D2249 MCP 
120-0174 P9001 FILECOPY 
120-0176 P9093 REORG 
120-0188 PI 365 FORTRAN 
120-0201 PI 500 CANDE 
121-0205 P1481 ALGOL 
121-0206 P1659 FILEDATA 
121-0206 P1659 MCP 
122-5045 PI 654 COBOL 
125-0208 P1488 WFL 
125-0211 P1531 RJE 
125-0214 D2586 MCP 
125-0214 D2586 WFL 
126-0176 P1475 JOBFORMAT 
126-0184 P1506 FORTRAN 
126-0194 PI 494 FORTRAN 
126-0212 P1542 FORTRAN 
128-0271 P9068 FORTRAN 
128-0368 P9068 FORTRAN 
128-0389 P9024 MCP 
128-0401 P9052 LOGANALY 
128-0437 PI 010 RJE 
128-0442 PI 103 ALGOL 
128-0455 P1407 CONTROLLER 
128-0459 P1365 FORTRAN 
128-0465 P1559 MCP 
128-0466 P1457 CONTROLLER 
128-0466 P1457 MCP 
128-0472 P1553 MCP 
128-0477 PI 560 MCP 
128-0483 P1011 RJE 
128-0483 PI 558 RJE 
128-0483 P1011 RJE 
128-0483 PI 558 RJE 



PATCH DESCRIPTION 
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.0016 B6800 Vs. FILECOPY Heading 
.0034 Loss of Lasl Co lumn 
.0037 Loss of Last Co lumn 
.0077 OPEN EXTEND Leaving I/O 
.0166 Test for WFL Data Decks 
Test for WFL Data Decks 
.0021 Multiple Task Execution 
.0016 B6800 Vs. FILECOPY Heading 
.0133 Update I/O Vs. 10ERROR 



Resu I t 

Being 

Being 



0009 
.0037 
.0039 
.0040 
.0018 
.0044 
.0076 
.0044 
.0023 
.0035 
.0044 
.0042 



.0015 
.0017 
.0015 



Usercode Attributes for RJE St 
WFL COMPILER with No PRIORITY 
Usercode Attributes for RJE St 
WFL COMPILER with No PRIORITY 
Usercode Attributes for RJE St 
Ml sslng SKIP to Channe I 1 
Va I ue Clause 

Missing SKIP to Channe I 1 
LOG COMMENT Equals LOG OPERATO 
Losing Blank Card at End of Bl 
Missing SKIP to Channel 1 
BREAK on RJE RSC 
.0043 FORMEDLP Array Vs. REMOTEPUNCH 
0021 INCLUDE. EXCLUDE Vs. Strings 
"SET STATISTICS" 
Delete Embedded Dataset Error 
INVALID INDEX Reorganizing Bit 
Four vs Three Digit System Ser 
Four vs Three""" 
Four vs Three 
Four vs Three 
Four vs Three 
Stretch Header 
Vo I ume De I e t e 



.0007 
.0002 
.0006 
.0005 
.0026 
.0103 
.0077 
.0019 
.0005 
.0005 
.0050 
.0020 
.0021 
.0019 
.0074 
,0028 
.0071 
0035 
0004 
0020 
0023 

0002 
0007 
0020 
0035 
0071 
0012 
0165 
0082 
0047 
0035 
0166 

0008 
0028 
0026 
0030 
0004 
0004 

0003 
0012 
0038 
0007 
0020 
0103 
0010 
0074 
0102 
0104 
0009 
0037 
0039 
0040 



Digit System Ser 
Digit System Ser 
Digit System Ser 
Digit System Ser 
for Current Row 



READALABEL Update of Tape Kind 
REBUILDPRINTQUEUE BD File Corr 
Filler Dropped from COBOL File 
Failure to Flag Large Precisio 
DMSCLOSEERROR 2 at End of Hall 
Real Valued Serial Numbers 
Minus Sign Probl ems 
PB "<filename>" CP <unitno> 
Recovery of Partitioned Struct 
Recovery of Partitioned Struct 
THRU Loops in I/O Lists 
State Dump Problems 
Increment Sequence Corrected 
Real Valued Serial Numbers 
BASIC, SETW Improvements 
OF of GETSTATUS Waiting on <fi 
Added Task Exclude Index File 
Invalid Reorganization of Empt 
INVALID OP in CHANGE . OPEN , 
State Dump Problems 
THRU Loops in I/O Lists 
TD830 Vs. Non-TD830 ODT 
TD830 Vs. Non-TD830 ODT 
Sequence Dollar Option not Rea 
Single Blank Character Siring 
Losing Blank Card at End of Bl 
Test for WFL Data Decks Being 
Test for WFL Data Decks Being 
Job Log I/O Errors 
Unexpected End of Initial Va I u 
Formal Array in Implied DO Loo 
Source Programs in BCD Code 
OPT=l Readlock Code 
OPT=l Readlock Code 
FIBLOCK and TIMESTAMP 
Spurious Records if File Equal 
Blank Cards Inserted into Inpu 
Error for Too Many Subscripts 
PD Equal Vs. Nonresident Files 
INVALID OP in CHANGE , OPEN , 
Volume Delete 

Filedata Catalog Resident Info 
Filedata Catalog Resident Info 
Controller Malfunction 
AX 

Usercode Attributes for RJE St 
WFL COMPILER with No PRIORITY 
Usercode Attributes for RJE St 
WFL COMPILER wilh No PRIORITY 
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FTR ACTION TABLE 

FTR NOTE SOFTWARE 
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166- 

166- 

166- 

166- 

166- 

166- 

167- 

168- 

168- 

168- 

169- 

169- 

169- 

170- 

170- 

170- 

174- 

174- 

179- 

179- 

180 

180 

180- 

181 

181 

183 

1B5 

185 

188 

188 

192 

192 

192 

194 

194 

194 

194 

194 

194 

194 

199 

199 

200 

200 

200 

200 

200 

201 



0483 
0693 
0696 
0705 
0099 
0102 
0110 
0163 
0170 
0171 
0252 
0274 
0280 
02B8 
0225 
0359 
0436 
0439 
0440 
0483 
0490 
0062 
0360 
0157 
0168 
0169 
0078 
0205 
0149 
0206 
0211 
0214 
0228 
0267 
0271 
■0272 
0278 
0279 
0279 
0291 
0130 
0285 
0292 
■0364 
•0148 
•0157 
•0157 
•0076 
•0078 
-0080 
•0138 
-0149 
-0243 
-0253 
-0545 
-0545 
-0546 
-0086 
-0125 
-2901 
-0238 
-0245 
-0140 
-0164 
-0269 
-0275 
-0280 
-0205 
-0208 
0211 
0220 
-0225 
-0226 
0226 
i-1103 
1103 
0203 
0203 
0217 
-0237 
-0240 
0246 



P1011 

P9115 

P9104 

P9200 

PI 323 

P9111 

P9199 

P9216 

PI 392 

P1290 

P1050 

PI 147 

PI 427 

PI 398 

D2225 

D2443 

P9122 

P9121 

D2240 

P1479 

P1560 

PI 365 

P1142 

P9112 

PI 093 

P1093 

PI 646 

P9105 

P9195 

PI 468 

P9274 

P9274 

P9191 

P1314 

D2249 

PI 289 

P1503 

PI 280 

PI 280 

PI 554 

P9126 

P1432 

P9133 

P1551 

P9024 

P9118 

P9119 

P9067 

D2521 

P1186 

P1092 

P1198 

P9000 

D2275 

PI 558 

PI 558 

PI 257 

P9159 

P9112 

PI 682 

P9252 

PI 335 

P9203 

P1681 

PI 075 

P9201 

P1607 

P9076 

P9076 

P1072 

PI 554 

P1622 

D2586 

D2586 

D2586 

D2586 

P1182 

PU82 

P1512 

PI 683 

PI 390 

PI 482 



WFL 

ESPOLINTRN 

BASIC 

BASIC 

MCP 

COBOL 

BACKUP 

RJE 

FILEDATA 

FILECOPY 

WFL 

COBOL 

SCTABLEGEN 

SORT 

FILECOPY 

BACKUP 

NDL 

NDL 

NDL 

MCP 

MCP 

FORTRAN 

DCSTATUS 

COBOL 

COBOL 

COBOL 

LOGGER 

BINDER 

COBOL 

PLI 

IN-OUTPUT 

IN-OUTPUT 

FILECOPY 

MCP 

MCP 

FILECOPY 

CANDE 

BDMSALGOL 

BDMSPL1 

MCP 

PLINTRN 

MCP 

WFL 

LOADER 

MCP 

LOGGER 

LOGGER 

COBOL 

COBOL 

FILEDATA 

COBOL 

PATCH 

FILECOPY 

BACKUP 

RJE 

RJE 

RJE 

WFL 

COBOL 

ACR 

DASDL 

IN-OUTPUT 

LOGANALY 

ACR 

RJE 

BASIC 

COBOL 

UTIL 

UTIL 

UTIL 

MCP 

UTIL 

MCP 

WFL 

MCP 

WFL 

MCP 

PROPERTIES 

MCP 

ACR 

ESPOL 

MCP 



PATCH DESCRIPTION 

Usercode Attributes for RJE St 

REPLACE FOR NUMERIC Correction 

Erroneous Lines Written to ERR 

Syntax "IF END/MORE" Correctly 

File Size Vs. Close with Crunc 

STRING get Erroneous Syntax Er 

Clean Up Error Hand I i ng 

Summary File Purge by *PB 

Running on B6800 

B6800 Vs. FILECOPY Heading 

Handl ing of KIND Lists in OLD 

PERFORM Statements 

Redundant Character Correction 

MERGE Vs. UNITS=1 

EXCLUDE Syntax Correction 

Disk and Pack Searched for Eac 

EOF with Missing Define Crossh 

One-Character Request Identifi 

FINISH TRANSMIT with Delay 

Protected Files Vs. Update Fil 

AX 

INVALID OP in CHANGE . OPEN , 

TERMINAL MAXINPUT/MAXOUTPUT In 

Group Computational Data Items 

Xref Giving wrong Sequence Num 

Xref Giving wrong Sequence Num 

INCLUDE, EXCLUDE Vs. Strings 

Large Host with Subroutines 

Include Size in Global Array I 

Preprocessor INITIAL Attribute 

CLOSE HERE on Empty Tape File 

CLOSE HERE on Empty Tape File 

EXTRACTONEFILE vs. GETSTATUS A 

CP Vs. HPT/PACK 

OF of GETSTATUS Waiting on <fi 

FKINDS Array Eliminated 

Special Characters in UTILITY 

Binding DMSII Accesses 

Binding DMSII Accesses 

RCNTL 

ISAM , Delete First Record in 

CP Vs. AIT 

Eliminate INVALID INDEX on WFL 

LOADER Vs. Multiprocessor 

F I BLOCK and TIMESTAMP 

INCLUDE, EXCLUDE, CORRECT I ON Arr 

EOF NO LABEL if Input Exceeds 

Constant Section Computational 

Floating Point Data Deelaratio 

Input String >255 Characters 

Prevention of Integer Overflow 

Incorrect Sequence Error Issue 

Superfluous Comma in WFL Deck 

Disallow "ND" When Used With " 

WFL COMPILER with No PRIORITY 

WFL COMPILER with No PRIORITY 

Printing Jobs with More Than 1 

Information Carry Over 

Group Computational Data Items 

Insert/Remove Reset Bitvector 

NOT FOUND Exceptions if Entire 

FILETYPE=4 Random I/O 

Log Date Cor r ec lion 

Embedded Data Set Paths Not In 

Extra Page of Paper 

Equal Precedence for Division 

Report Writer 

No Reconstruction on Row Not D 

No Reconstruction on Row Not D 
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30. 
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30. 

30. 

30. 

30. 

30. 

30. 

30. 

30. 

30. 

30. 

30. 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 



0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
0. 
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.0. 
.0. 
.0. 
.0. 
.0. 
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.0 
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.0 



0018 
0003 
0002 
0004 
0007 
0007 
0010 
0007 
0008 
0016 
0023 
0037 
0003 
0001 
0003 
0013 
0003 
0002 

0082 
0104 
0020 
0002 
0010 
0031 
0031 
0021 
0007 
0015 
0016 
0023 
0023 
0004 
0003 

0015 
0039 
0053 
0012 
0101 
0004 
0075 
0009 
0008 

0002 
0003 
0005 
0049 
0006 
0030 
0003 
0001 
0011 
0037 
0040 
0021 
0012 
0010 
0091 
0028 
0030 
.0007 
,0090 
,0017 
,0003 
,0074 
,0010 
,0010 
,0019 
.0101 
,0050 
.0166 



File Listed Inside Parentheses 

RCNTL 

Row Selection with Multiple Op 

Test for WFL Data Decks Being 
Data Decks Be i ng 
Data Decks Be i ng 
Data Decks Be i ng 



Test for WFL 
.0166 Test for WFL 

Test for WFL 

DBS D3 NOMEM 
.0016 DBS D3 NOMEM 
.0093 DMSOPEN Header 

.0092 Attribute Error RSFILE . IOCLOCK 
.0005 Bindinfo for Double Precision 
.0086 SWAPPER Vs. EI 
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FTR ACTION TABLE 

FTR NOTE SOFTWARE 

201-0251 PI 336 CONTROLLER 
201-0255 P1500 CANDE 
202-0224 PI 1 14 LOGSTRIPPER 
203-0137 P1071 ACR 
203-0140 PI 145 COBOL 
203-0143 P1504 COBOL 
208-7706 P1497 CANDE 
208-7707 P1478 MCP 
208-7711 P1354 RECOVERY 
209-0027 P9073 ACR 
210-0105 P8618 LOGGER 
210-0134 P1687 INQ 
211-7741 P9200 BASIC 
215-0126 P1099 PLINTRN 
222-0376 P1481 ALGOL 
226-0358 PI 350 PTNCTL 
226-0364 P1583 RECOVERY 
226-0365 P1597 UTIL 
226-0382 P1471 ACR 
226-0385 P1629 UTIL 
226-0391 P1654 COBOL 
227-0111 PI 565 BACKUP 
231-0383 P9026 LOGANALY 
231-0395 P1282 COBOL 
231-0405 P1659 FILEDATA 
231-0405 PI 659 MCP 
231-0412 P1667 MCP 
236-0028 P1051 WFL 
236-0041 P1659 FILEDATA 
236-0041 P1659 MCP 
238-0160 P1257 RJE 
241-0096 P1498 CANDE 
244-0150 P1090 COBOL 
244-0151 P1433 MCP 
244-0152 PI 432 MCP 
248-0033 P1482 MCP 
248-0035 P1068 WFL 
248-0101 PI 150 COBOL 
248-0105 PI 495 SCR 
248-0107 PI 148 COBOL 
248-0108 PI 284 BDMSCOBOL 
248-0113 P1300 LOGGER 
249-0117 P9129 PLINTRN 
249-0129 P1398 SORT 
249-0131 P1492 DATACOM 
249-0140 P1659 FILEDATA 
249-0140 Pi 659 MCP 
249-0143 P1659 FILEDATA 
249-0143 PI 659 MCP 
252-0074 P1507 COBOL 
252-0090 D2491 RJE 
254-0010 P9112 COBOL 
254-0017 P1659 FILEDATA 
254-0017 P1659 MCP 
255-2000 P9118 LOGGER 
255-2013 PI 646 LOGGER 
256-0101 P1006 COBOL 
256-0104 D2586 MCP 
256-0104 D2586 WFL 
261-0147 P8618 LOGGER 
261-0155 P9068 FORTRAN 
261-0162 P9068 FORTRAN 
261-0215 P1645 LOGGER 
261-0216 P1646 LOGGER 
261-0219 P1497 CANDE 
261-0235 P1659 FILEDATA 
261-0235 P1659 MCP 
264-0055 PI 106 CANDE 
264-0072 P9130 PLINTRN 
264-0075 PI 104 CANDE 
264-0077 D2426 RJE 
264-0082 P1659 FILEDATA 
264-0082 P1659 MCP 
264-0088 P1649 COBOL 
265-0017 D2521 COBOL 
272-0027 P1398 SORT 
273-0019 P1010 RJE 
278-0030 P9130 PLINTRN 
285-0030 P1689 
285-0031 P1691 
286-0024 P1510 COBOL 
286-0027 P1542 FORTRAN 



PATCH 



DESCRIPTION 



INQ 
INQ 



30.0.0002 MCS Message Causes SEG ARRAY 
30.0.0035 Stale Dump Problems 
30.0.0001 File Added, Duplicate Idenlifi 
30.0.0050 DMSCLOSEERROR 2 at End of Halt 
30.0.0035 Recognition of Numeric Literal 
30.0.0067 STATISTICS Option 
30.0.0032 ?QUIT Fai lure 
30.0.0080 Ending Banner Vs. Page Size 
30.0.0024 Rebuild After Deleting Structu 
30.0.0017 Delete Embedded Dataset Error 
30.0.0001 UPDATE Option New File Creatio 
30.0.0038 Error on User Supplied Subscri 
30.0.0004 Syntax "IF END/MORE" Correctly 
30.0.0013 Character to Bit Conversion 
30.0.0071 THRU Loops in I/O Lists 
30.0.0005 Wrong Family for Global Data 
30.0.0030 ROLLBACK Using Tape Audit 
30.0.0045 Tape Kind Set Correctly for Fi 
30.0.0071 Attribute Errors on Control Fi 
30.0.0054 System Partitioned Files can b 
30.0.0082 Sequence Dollar Option not Rea 
30.0.0015 Printer Selectable with Reel # 
30.0.0001 Syntax Correction for SESSION 
30.0.0053 ADD Statements 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0133 Update I/O Vs. IOERROR 
30.0.0024 DATA or END Within File Names 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0021 Printing Jobs with More Than 1 
30.0.0033 Incorrect Destinations for ?RE 
30.0.0028 RERUN Statement Branched Incor 
30.0.0076 CP Security 
30.0.0075 CP Vs. AIT 
30.0.0086 SWAPPER Vs. EI 

30.0.0027 Infinite Loop Following Securi 
30.0.0040 Program Collating Sequence Cla 
30.0.0009 Allow Train Table Load 
30.0.003B COPY Statements 
30.0.0055 Data Base Section Syntax 
30.0.0010 Three vs. Four Digit System ID 
30.0.0007 ISAM , Return Proper Value fro 
30.0.0001 MERGE Vs. UNITS=1 
30.0.0089 Prevent DCSTATUS Dump with Ext 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0066 Syntax Group Comp Item Used as 
30.0.0024 LOGON Without PASSWORD on B700 
30.0.0010 Group Computational Data Items 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0002 INCLUDE, EXCLUDE, CORRECT I ON Arr 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0.0021 INVALID INDEX on WAIT Statemen 
30.0.0166 Test for WFL Data Decks Being 
30.0. Test for WFL Data Decks Being 
30.0.0001 UPDATE Option New File Creatio 
30.0.0004 OPT=l Readlock Code 
30.0.0004 OPT=l Readlock Code 
30.0.0020 PRIORITY Item Type INTEGER 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0.0032 7QUIT Fai lure 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0014 Compile Time Task Attributes 
30.0.0010 ISAM , Erroneous ISCLOSE Resul 
30.0.0012 Empty Buffer Size in TERMINAL 
30.0.0016 Device Not Ready Abort QT of P 
30.0.0012 TDB30 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0080 NEXT SENTENCE in INVALID KEY 
30.0.0049 Floating Point Data Declaratio 
30.0.0001 MERGE Vs. UNITS=1 
30.0.0012 Blank Cards Inserted into Inpu 
30.0.0010 ISAM , Erroneous ISCLOSE Resul 
30.0.0044 SEG ARRAY on Special Character 
30.0.0046 Nested Defines 
30.0.0068 Global Direct Files Passed to 
30.0.0030 Source Programs in BCD Code 
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FTR ACTION TABLE 

FTR NOTE SOFTWARE 



286-0037 

286-0037 

286-0046 

290-0031 

292-0107 

292-0120 

292-0121 

292-0129 

292-0129 

293-0067 

293-0073 

293-0074 

293-0077 

293-0078 

293-0079 

293-0081 

299-0113 

299-0123 

299-0127 

299-0128 

299-0129 

299-0134 

299-0141 

299-0146 

299-0150 

299-0167 

300-7710 

300-7727 

300-7740 

300-7741 

301-0001 

303-0001 

306-0012 

306-0013 

306-0013 

309-0010 

309-0011 

309-0021 

311-0166 

311-0176 

311-0185 

311-0187 

311-0193 

312-0032 

312-0036 

312-0039 

312-0050 

312-0058 

314-0010 

314-0011 

314-0013 

314-0014 

319-0037 

319-0040 

319-0041 

319-0056 

323-0020 

324-0007 

326-0001 

329-0002 

331-0004 

331-0004 

331-0004 

335-0030 

337-0007 

337-0007 

337-0007 

339-0055 

341-0074 

343-0017 

343-0019 

345-0815 

345-0815 

345-0815 

345-0903 

345-0917 

345-0918 

345-0919 

345-0919 

345-0920 

345-0921 

347-0024 



PI 659 

PI 659 

PI 626 

PI 362 

P9127 

P9205 

P9204 

P1361 

P1361 

P1541 

PI 121 

PI 122 

PI 397 

P1303 

P1500 

PI 398 

P1413 

P9303 

PI 160 

P 1 1 46 

PI 043 

PI 091 

PI 151 

PI 042 

P9134 

PI. 365 

PI 149 

PI 115 

PI 433 

P1316 

PI 500 

D2573 

PI 489 

P1361 

P1361 

P9134 

P9030 

PI 646 

P9024 

PI 105 

P1561 

P1408 

PI 499 

P9110 

P9019 

P9194 

P1581 

PI 594 

P1391 

P1159 

PI 057 

P9191 

P8912 

P9261 

P9096 

P1351 

P1107 

PI 646 

P9113 

P8618 

P1333 

P1333 

PI 333 

P9191 

D2288 

D2288 

D2288 

P1064 

PI 646 

PI 299 

PI 542 

D2424 

D2424 

D2424 

PI 638 

PI 295 

PI 296 

PI 294 

PI 294 

PI 297 

PI 298 

P9135 



FILEDATA 

MCP 

RJE 

ESPOLINTRN 

PLINTRN 

LOGGER 

LOGGER 

DCPPROGEN 

NDL 

FORTRAN 

RJE 

RJE 

MCP 

RJE 

CANDE 

SORT 

COBOL 

SOURCENDL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

FILECOPY 

WFL 

FORTRAN 

COBOL 

LOGMAPPER 

MCP 

MCP 

CANDE 

FORTRAN 

WFL 

DCPPROGEN 

NDL 

WFL 

BACKUP 

LOGGER 

MCP 

CANDE 

MCP 

MCP 

CANDE 

BDMSCOBOL 

UTIL 

COBOL 

UTIL 

ACR 

MCP 

COBOL 

ACR 

FILECOPY 

REORG 

ACR 

ACR 

PRINTAUDIT 

CANDE 

LOGGER 

DUMPALL 

LOGGER 

MCP 

MCP 

MCP 

FILECOPY 

ACR 

PROPERTIES 

RECOVERY 

WFL 

LOGGER 

LOGGER 

FORTRAN 

ALGOL 

BINDER 

FORTRAN 

ALGOL 

LOGANALY 

LOGANALY 

JOBFORMAT 

LOGANALY 

LOGANALY 

LOGANALY 

WFL 



PATCH DESCRIPTION 

30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0044 Missing SKIP to Channel 1 
30.0.0020 BASIC, Making Arrays Present V 
30.0.0005 ISAM , Numeric Keys 
30.0.0007 Include UNITNO Correction 
30.0.0008 Retention Report Item Correct! 
30.0.0010 Auxiliary Logic Correction 
30.0.0005 Auxiliary Logic Correction 
30.0.0029 Formal s as " I mp I i e d-DO-Var i ab I 
30.0.0019 REBUILDPRINTQUEUE BD File Corr 
30.0.0020 INVALID INDEX with One Word Me 
30.0.0050 PB MT<number> Vs. ACMAX 
30.0.0029 REMOTECONTROL Vs. PR1MARYQUEUE 
30.0.0035 State Dump Problems 
30.0.0001 MERGE Vs. UNITS=1 
30.0.0047 SET Statements 

30.0.0001 Modifications to TD800 Request 
30.0.0034 Listing of Omitted Source Lang 
30.0.0036 Invalid Level Numbers 
30.0.0023 Numeric Test Failed to Check S 
30.0.0029 Code Listing 

30.0.0042 Unnecessary Code Generation 
30.0. " (<usercode>) =" Syntax Error 
30.0.0010 Proper Information for Long CO 
30.0.0020 INVALID OP in CHANGE , OPEN , 
30.0.0039 XREF 

30.0.0001 SPO Input Error Messages 
30.0.0076 CP Security 
30.0.0005 CP File Secur i ty 
30.0.0035 Stale Dump Problems 
30.0. Exponentiation Meaning 
30.0.0046 Correct HEX Function 
30.0.0010 Auxiliary Logic Correction 
30.0.0005 Auxiliary Logic Correction 
30.0.0010 Proper Information for Long CO 
30.0.0001 BACKUP Vs. GETSTATUS 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0. FIBLOCK and TIMESTAMP 
30.0.0013 Nongraphic Characters in ?SS a 
30.0.0105 FORMATBUFFER 

30.0.0058 FAULTHANDLER Vs. Tagged Words 
30.0.0034 Incorrect Error Messages 
30.0.0006 XREF DM Keys in SELECTION Exp 
30.0.0008 Reconstruct Empty File 
30.0.0017 Multiple COPY Statements 
30.0.0044 Halt/Load Restart with Mu 1 1 i p I 
30.0.0080 Deadlock During On-Llne Recons 
30.0.0056 Direct Read from Schedule File 
30.0.0033 TIME Intrinsic 

30.0.0053 Audited Bit Vector ZERO DISK A 
30.0.0004 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0001 Sort Error #4 on Internal Sort 
30.0.0045 Find Next Direct at Key > Va I u 
30.0.0024 Incorrect Restart Record 
30.0.0005 Time Off by One Second 
30.0.0015 Incorrect Statistics 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0.0002 Packname Option for File Routi 
30.0.0001 UPDATE Option New File Creatio 
30.0.0028 PATHRES PBIT 
30.0.0040 PATHRES PBIT 
30.0.0063 PATHRES PBIT 

30.0.0004 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0044 Path Fixing Consistent 
30.0.0013 Path Fixing Consistent 
30.0.0017 Path Fixing Consistent 
30.0.0026 Improve Handling End of File 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0.0009 INCLUDE, EXCLUDE Correction 
30.0.0030 Source Programs in BCD Code 
30.0.0027 AUTOBIND and PPB 
30.0.0011 AUTOBIND and PPB 
30.0.0017 AUTOBIND and PPB 
30.0.0081 Scanning After XREFFILES 
30.0.0009 STOPDATE Default 
30,0.0010 MAINT Log Entries 
30.0.0001 Cosmetic Changes 
30.0.0011 Cosmetic Changes 
30.0.0012 IOERR1RRCOUF Field 
30.0.0013 INVALID INDEX in SORT IN Proced 
30.0.0011 Perform Job Rollout in More In 



FTR ACTION TABLE 

FTR NOTE SOFTWARE 



348-0049 

348-0053 

348-0053 

348-0053 

348-0058 

348-0061 

348-0062 

348-0066 

348-0068 

348-0068 

348-0069 

348-0069 

348-0071 

348-0072 

348-0073 

348-0073 

348-0078 

348-0089 

348-0092 

352-1016 

361-0071 

361-0082 

361-0084 

361-0088 

361-0090 

361-0099 

363-0005 

366-0121 

366-9015 

368-0039 

368-0056 

368-0063 

369-0014 

369-0037 

369-0047 

369-0048 

370-0009 

372-0014 

372-0200 

373-0016 

373-0022 

373-0033 

373-0037 

374-0022 

374-0033 

374-0041 

381-0013 

381-0022 

381-0025 

382-0010 

382-0020 

383-0001 

386-0017 

386-0018 

386-0018 

389-0032 

389-0045 

389-0046 

389-0047 

389-0048 

390-0012 

390-0012 

393-0015 

393-0028 

393-0051 

393-0053 

393-0060 

393-0068 

393-0069 

393-0082 

393-0083 

393-0092 

393-0111 

393-0122 

393-9115 

396-7002 

397-0006 

397-0015 

399-9039 

402-0011 

403-0006 

403-0013 



PI 563 

PI 333 

PI 333 

P1333 

PI 499 

P1306 

P1425 

P1497 

PI 493 

PI 493 

P1493 

P1493 

P1304 

P1304 

PI 558 

PI 558 

D2560 

PI 566 

PI 578 

PI 649 

P1120 

PI 120 

P1302 

PI 299 

PI 486 

PI 644 

P9191 

P1090 

P9026 

P9177 

P1337 

PI 634 

P9105 

PI 121 

PI 680 

PI 685 

PI 398 

P9206 

PI 398 

PI 648 

PI 649 

PI 360 

PI 492 

P9106 

P1124 

P9114 

PI 398 

PI 353 

PI 635 

P9126 

P1500 

P9128 

PI 646 

D2586 

D2586 

D2274 

P9090 

P9089 

P9251 

PI 058 

PI 567 

PI 567 

P1089 

P1240 

D2217 

P9178 

P1411 

PI 152 

P9178 

P1147 

PI 088 

PI 152 

P1614 

PI 497 

PI 696 

P9112 

P1044 

PI 346 

P9032 

PI 275 

P9175 

PI 543 



MCP 
MCP 

MCP 

MCP 

CANDE 

RJE 

RJE 

CANDE 

MCP 

MCP 

MCP 

MCP 

RJE 

RJE 

RJE 

RJE 

RJE 

RJE 

DIAGNOSTMCS 

COBOL 

BDMSPLI 

BDMSPLI 

PL I 

LOGGER 

BDMSALGOL 

LOGGER 

FILECOPY 

COBOL 

LOGANALY 

ACR 

FILECOPY 

RECOVERY 

BINDER 

RJE 

ACR 

BUILDINQ 

SORT 

LOGGER 

SORT 

COBOL 

COBOL 

DCPPROGEN 

DATACOM 

BINDER 

LTTABLEGEN 

DUMPALL 

SORT 

RECOVERY 

UTIL 

PLINTRN 

CANDE 

PLINTRN 

LOGGER 

MCP 

WFL 

RJE 

DASDL 

DASDL 

ACR 

ACR 

COBOL 

COBOL 

COBOL 

COBOL 

BACKUP 

ACR 

COBOL 

COBOL 

ACR 

COBOL 

COBOL 

COBOL 

RECOVERY 

CANDE 

RECOVERY 

COBOL 

COBOL 

ACR 

LOGANALY 

DASDL 

BACKUP 

FORTRAN 
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PATCH DESCRIPTION 

30.0.0109 IAD Vs. HLUNIT 
30.0.0028 PATHRES PBIT 
30.0.0040 PATHRES PBIT 
30.0.0063 PATHRES PBIT 
30.0.0034 Incorrect Error 
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Me s sage s 
30.0.0027 RJELINKED Recovery Problem 



30.0 
30.0 
30 

30 
30 
30 



30 
30 
30 
SO- 
SO 
30 
30 
30 
30 
30 
30 
30 
30 
30 



0034 
0032 
0092 
0113 
0092 
0113 
0023 
0023 
0.0037 
0.0040 
0.0036 
0.0038 
0.0002 
0.0080 
0.0008 
0.0008 
0.0009 
0.0009 
0072 
0019 



Foreign Slation 
7QUIT Fai lure 



Transfer 



LIBMAINT Vs. TAPEPARITYRETRY 
LIBMAINT Vs. TAPEPARITYRETRY 
LIBMAINT Vs. TAPEPARITYRETRY 
LIBMAINT Vs. TAPEPARITYRETRY 
USER Option for WFL Secured Re 
USER Option for WFL Secured Re 
WFL COMPILER with No PRIORITY 



WFL COMPILER with No PRIORITY 
"•STATUS" Report NO TASKS ACT I 
DESTNAME NEQ RJE Terminal Pr 
Invalid Case Index in STASTATE 
NEXT SENTENCE in INVALID KEY 
Reuse Scratch Slack Areas in K 
Reuse Scratch Stack Areas in K 
RESTARTED Task Attribute 
INCLUDE, EXCLUDE Correction 
Allow "-" in Data Base I dent if 
REAL, INTEGER ITEMS Used as BR 
30.0.0004 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0028 RERUN Statement Branched Incor 
30.0.0001 Syntax Correction for SESSION 
30.0.0032 Initialization of Variable-For 
30.0.0017 Card Input vs. UNITS=1 
30.0.0036 Data Recovery Selling Bad EOF 
30.0.0007 Large Host with Subroutines 
30.0.0019 REBUILDPRINTQUEUE BD File Corr 
30.0.0087 Result on SELECT Reject 
30.0.0009 Building Structures Not In Log 
30.0.0001 MERGE Vs. UNITS-1 
30.0.0006 BREAK ON PRIORITY 
30.0.0001 MERGE Vs. UNITS-1 
30.0.0081 Illegal Syntax for READ not Ca 
30.0.0080 NEXT SENTENCE in INVALID KEY 
30.0.0011 Correct Address Used as a Byte 
30.0.0089 Prevent DCSTATUS Dump with Ext 
30.0.0009 USE Cards Obeyed 
30.0.0002 User Specified Tables 
30.0.0003 Correctly Print Variable Recor 
30.0.0001 MERGE Vs. UNITS-1 
30.0.0023 Miscellaneous Rebuild Error 
30.0.0055 PRINTIT Gives Error for Block 
30.0.0004 ISAM , Delete First Record in 
30.0.0035 State Dump Problems 
30.0.0006 ISAM , Adding Records to Unblo 
30.0.0021 INCLUDE, EXCLUDE Vs. Strings 
30.0.0166 Test for WFL Data Decks Being 
30.0. Tesl for WFL Data Decks Being 
30.0.0008 SAVE/READY Station Removal 
30.0.0023 DIVIDE BY ZERO 
30.0.0022 Sets with Name DATA 
30.0.0026 Too Many Table Levels Cause IN 
30.0.0052 SEG ARRAY Fault when Creating 
30.0.0073 ANSI74 Default Write After Adv 
30.0.0079 ANS174 Default Write After Adv 
30.0.0027 INVALID INDEX by LOCK Statemen 
30.0.0048 XREF 

30.0.0002 "AX-<record *>" GTR Current Re 
30. 0.0034 Standard Variable Format Avail 
30.0.0045 MONITOR 

30.0.0044 Undigit Literals in VALUE Clau 
30.0.0034 Standard Variable Format Avail 
30.0.0037 PERFORM Statements 
30.0.0026 Semicolon in NEXT SENTENCE and 
30.0.0044 Undigit Literals in VALUE Clau 
30.0.0031 Restart Reconstruction at Rest 
30.0.0032 7QUIT Fai lure 

30.0.0037 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0010 Group Computational Data Items 
30.0.0024 Incorrect Time Generated by AC 
30.0.0063 Abort Due to BAD DIVEST 
30.0.0002 UA/UR Message Displays 
30.0.0047 Improper Invalid Text 
30.0.0003 Remove Extra Page Skips 
30.0.0031 Syntax For DO Statement 
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FTR ACTION TABLE 

FTR NOTE SOFTWARE 



405 

4-05 

405- 

405 

405 

405- 

405- 

405- 

405 

405- 

405- 

405 

406 

406 

406 

406 

406 

406 

406 

406- 

406- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

415- 

417- 

417- 

417- 

417- 

419- 

419- 

419- 

435- 

435- 

437- 

437- 

437 

439- 

439- 

445 

447- 

450 

450 

451 

453 

454 

455 

455 

466 

467 

549 

549 



0010 
0011 

ooie 

0017 

0020 

0026 

0029 

0031 

0031 

0033 

0035 

0040 

0004 

0012 

0013 

0015 

0017 

0029 

0032 

0033 

0036 

0025 

0036 

0078 

0083 

0095 

0101 

0101 

0101 

0101 

0101 

0103 

0107 

0110 

0118 

0133 

0138 

0151 

0157 

0158 

0160 

0164 

0165 

0165 

0169 

2006 

2006 

2009 

2010 

0007 

0010 

0010 

0027 

0033 

0512 

0513 

0514 

0002 

0004 

•0013 

-0012 

-0002 

■0002 

•0002 

•0001 

■9008 

-0004 

•0004 

-0002 

-0001 

-0001 

-0001 



P9299 
P9030 
P9191 
D2492 
P1304 
PI 353 
P1424 
D2586 
D2586 
PI 595 
PI 469 
P1613 
P9053 
P9053 
P9020 
P9289 
P1651 
PI 586 
PI 583 
P1631 
PI 632 
P9013 
PI 185 
PI 139 
P1141 
D2482 
P9185 
P9185 
P9185 
P9185 
P9185 
PI 276 
PI 274 
PI 355 
PI 283 
PI 353 
P1447 
PI 696 
PI 695 
PI 694 
P1613 
PI 678 
PI 532 
PI 532 
PI 679 
P1361 
P1361 
PI 500 
P1500 
PI 300 
PI 493 
PI 493 
PI 508 
PI 626 
PI 170 
PI 170 
PI 169 
PI 088 
PI 044 
PI 587 
PI 187 
PI 659 
PI 659 
P9191 
P1508 
PI 399 
PI 659 
PI 659 
PI 482 
PI 568 
PI 280 
PI 280 



COBOL 

BACKUP 

FILECOPY 

RJE 

RJE 

RECOVERY 

RJE 

MCP 

WFL 

BUILDINQ 

ACR 

ACR 

DASDL 

DASDL 

ACR 

FILECOPY 

DCALGOL 

COPYAUD-II 

RECOVERY 

RECOVERY 

RECOVERY 

ACR 

FILEDATA 

PKTEST225 

DCSTATUS 

UTIL 

ACR 

PRINTAUDIT 

PROPERTIES 

RECOVERY 

RECOVERY 

DMCTL 

ACR 

UTIL 

BDMSCOBOL 

RECOVERY 

DASDL 

RECOVERY 

LOADDUMP 

LOADDUMP 

ACR 

ACR 

ACR 

RECOVERY 

ACR 

DCPPROGEN 

NDL 

CANDE 

CANDE 

LOGGER 

MCP 

MCP 

FILECOPY 

RJE 

RSLOG 

RSLOG 

RSLOG 

COBOL 

COBOL 

ACR 

DCPPROGEN 

FILEDATA 

MCP 

FILECOPY 

FILECOPY 

CONTROLLER 

FILEDATA 

MCP 

MCP 

BACKUP 

BDMSALGOL 

BDMSPLI 



PATCH DESCRIPTION 

30.0.0018 SEG ARRAY Termination of Corapi 
30.0.0001 BACKUP Vs. GETSTATUS 
30.0.0004 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0026 Backup File Routing 
30.0.0023 USER Option for WFL Secured Re 
30.0.0023 Miscellaneous Rebuild Error 
30.0.0031 SYSTEM/BACKUP Vs. Disk or Pack 
30.0.0166 Test for WFL Data Decks Being 
30.0. Test for WFL Data Decks Being 
30.0.0008 Loop Ing 

30.0.0070 All Zero Blocks/Records 
30.0.0082 Fix Audit Lastrecord; Zip COPY 
30.0.0016 VERIFYSTORE Text for Remaps 
30.0.0016 VERIFYSTORE Text for Remaps 
30.0.0014 INVALID INDEX, Variable Format 
30.0.0011 Scanner Field Extensions 
30.0.0082 Left Type Transfer Function 
30.0.0004 Copy Primary Audit on Tape 
30.0.0030 ROLLBACK Using Tape Audit 
30.0.0035 ROLLBACK Gets Timestamp Mismat 
30.0.0034 Erroneous Row Lockout 
30.0.0012 Return Correct Structure Numbe 
30.0.0003 LFILES CAT 
30.0. B6800 Compatible RD 
30.0.0001 DCPANALYSIS Output Reformatted 
30.0.0026 No File on CONTROLOLD 
30.0.0035 Elimination of Holes in Restar 
30.0.0003 Elimination of Holes in Restar 
30.0.0011 Elimination of Holes in Restar 
30.0.0014 Elimination of Holes in Restar 
30.0.0021 Elimination of Holes in Restar 
30.0.0017 Invalid Version Timestamp Mism 
30.0.0058 Missing HANDLEWRITEERROR Call 
30.0.0028 Remove First Read Error Messag 
30.0.0054 Compares Involving Data Set Na 
30.0.0023 Miscellaneous Rebuild Error 
30.0.0052 Deleting Many Structures 
30.0.0037 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0007 Invalid Syntax Error 
30.0.0006 Syntax Error When Mapping Bit 
30.0.0082 Fix Audit Lastrecord; Zip COPY 
30.0.0085 Errors in Recovery Close 
30.0.0078 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0029 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0086 Deadlock Reconstruction Vs. Sy 
30.0.0010 Auxiliary Logic Correction 
30.0.0005 Auxiliary Logic Correction 
30.0.0035 State Dump Problems 
30.0.0035 State Dump Problems 
30.0.0010 Three vs. Four Digit System ID 
30.0.0092 LIBMAINT Vs. TAPEPARITYRETRY 
30.0.0113 LIBMAINT Vs. TAPEPARITYRETRY 
30.0.0021 Multiple Task Execution 
30.0.0044 Missing SKIP to Channel 1 
30.0.0002 Handle Multi-Record Log Entrie 
30.0.0002 Handle Multi-Record Log Entrie 
30.0.0003 Correct Date Printout 
30.0.0026 Semicolon in NEXT SENTENCE and 
30.0.0024 Incorrect Time Generated by AC 
30.0.0079 Serial Access of Invalid State 
30.0.0009 Full Duplex Station Not Busy 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0004 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0021 Multiple Task Execution 
30.0.0005 DIR Vs. Input Scanner 
30.0.0012 TD830 Vs. Non-TD830 ODT 
30.0.0165 TD830 Vs. Non-TD830 ODT 
30.0.0086 SWAPPER Vs. EI 
30.0.0017 Error for Colon Without ALGOL 
30.0.0053 Binding DMSII Accesses 
30.0.0012 Binding DMSII Accesses 



PATCH TABLE 
SOFTWARE 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ACR 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 
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PATCH PRI NOTE DESCRIPTION 

30.0.0002 32298 P8946 Interlock of Abort and Reconsl 
30.0.0005 32289 P8943 Correct Discontinuity Checking 
30.0.0006 32879 D2219 Node Syntax 

30.0.0008 32290 PG975 Handle Audit Block Size Ciange 
30.0.0012 32285 P9013 Return Correct Structure Numbe 
30.0.0013 34232 P9018 I/O Errors on Open 
30.0.0014 32431 P9020 INVALID INDEX, Variable Format 
30.0.0017 32428 P9073 Delete Embedded Dataset Error 
30.0.0018 32424 D2277 SEGDESCABOVE 
30.0.0019 32421 D2278 Display Structure Number 
30.0.0020 32420 P9094 Fail When Print Statistics 
30.0.0021 32438 D2279 Eliminate Warning if No Logics 
30.0.0022 32418 D2244 Limit Error 
30.0.0023 32713 P9084 Invalid DATAERROR 4 
30.0.0024 32798 P9096 Incorrect Restart Record 
30.0.0025 32716 P1017 ACCESSROUTINES Segmentation 
30.0.0026 32717 P9251 Too Many Table Levels Cause IN 
30.0.0027 32719 P1018 Improve I/O Error Display 
30.0.0028 32795 P1019 Ordered Data Sets Out of Seque 
30.0.0029 32725 P1020 Control File Locking 
30.0.0030 32280 P9264 Eliminate MASKSEARCH in FIND K 
30.0.0031 32791 P9181 Correct Ordered Set Paths 
30.0.0032 32790 P9177 Initialization of Variable-For 
30.0.0033 32791 P9181 Correct Ordered Set Paths 
30.0.0034 32726 P9178 Standard Variable Format Avail 
30.0.0035 32789 P9185 Elimination of Holes in Restar 
30.0.0037 32783 P9256 Correct Path for Disjoint Orde 
30.0.0038 32788 P9257 Data Corruption in Root Word 
30.0.0039 32729 P9283 Warnings Suppressed 
30.0.0040 32730 P9284 Comp i I e-T i me Printing 
30.0.0043 32986 P9260 Accelerate Not Found Linear Se 
30.0.0044 32781 D2288 Path Fixing Consistent 
30.0.0045 32786 P9261 Find Next Direct at Key > Valu 
30.0.0046 32984 P9281 Ordered Access Path 
30.0.0047 32983 P9280 Partitioned Index Sets 
30.0.0048 32720 D2291 Use of Description File 
30.0.0049 32981 D2438 Buffer Core Improvement 
30.0.0050 36969 PI 071 DMSCLOSEERROR 2 at End of Hall 
30.0.0051 32970 P1028 DASDL Update Timestamp 
30.0.0052 32965 P105B SEG ARRAY Fault when Creating 
30.0.0053 32964 P1057 Audited Bit Vector ZERO DISK A 
30.0.0054 33093 D2458 Version Overrides Recorded 
30.0.0055 32960 P1199 Mark Stack DS if Abort Dies 
30.0.0056 32959 P1200 SEG ARRAY if Pack Audit 
30.0.0057 32958 PI 153 Storage Close in Unaudited Dat 
30.0.0058 33350 PI 274 Missing HANDLEWRITEERROR Call 
30.0.0059 31104 D2462 Read Ahead Buffering 
30.0.0060 33430 D2497 New Method of Data Base Initia 
30.0.0061 33342 P1344 SET ROWLOCK Read, Write Errors 
30.0.0062 33343 P1345 Retry Disk Read on Checksum Er 
30.0.0063 33339 P1346 Abort Due to BAD DIVEST 
30.0.0064 33334 P1400 False Errorexil 9 in DIVEST Un 
30.0.0065 33342 P1344 SET ROWLOCK Read, Write Errors 
30.0.0066 31104 D2462 Read Ahead Buffering 
30.0.0067 33342 P1344 SET ROWLOCK Read, Write Errors 
30.0.0068 33332 P1342 Innocent Programs Hang on Dise 
30.0.0070 30008 P1469 All Zero Blocks/Records 
30.0.0071 33114 P1471 Attribute Errors on Control Fi 
30.0.0072 31104 D2462 Read Ahead Buffering 
30.0.0074 30011 P1521 Recovery of Partitioned Struct 
30.0.0075 31104 D2462 Read Ahead Buffering 
30.0.0076 31104 D2462 Read Ahead Buffering 
30.0.0077 33117 P1533 ZERO FIND ADDRESS After INSERT 
30.0.0078 32020 P1532 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0079 32005 P1587 Serial Access of Invalid Stale 
30.0.0080 31999 P1594 Deadlock During On-Line Recons 
30.0.0081 32011 P1616 Error in SET TO ENDING Ordered 
30.0.0082 33794 P1613 Fix Audit Laslrecord; Zip COPY 
30.0.0085 33777 P1678 Errors in Recovery Close 
30.0.0086 33781 P1679 Deadlock Reconstruction Vs. Sy 
30.0.0087 34281 P1680 Result on SELECT Reject 
30.0.0090 34286 P1681 Embedded Data Set Paths Not In 
30.0.0091 34290 P1682 1 nser I /Remove Reset Bilvector 
30.0.0092 34283 PI 683 Attribute Error RSFILE . IOCLOCK 
30.0.0093 34297 P1684 Halt Load Recovery Uses Wrong 
30.0.0004 30070 D2427 String Implementation 
30.0.0005 30070 D2427 Siring Implementation 
30.0.0017 32449 P9072 SINCLUDE Interrupts SMAKEHOST 
30.0.0018 32425 D2241 SEGDESCABOVE $ Option 
30.0.0020 32668 P9101 Real Valued Serial Numbers 
30.0.0021 32419 P9102 Compile-Time Display 
30.0.0022 32685 D2265 Standardization of Compiler Fi 



PAGE 260 



MARK 3.0 



PAGE 261 



PATCH TABLE 
SOFTWARE 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOLTABLE 

ALGOLTABLE 

ALGOLTABLE 

ALGOLTABLE 

ATTABLEGEN 

ATTABLEGEN 

ATTABLEGEN 

ATTABLEGEN 

ATTABLEGEN 

ATTABLEGEN 

ATTABLEGEN 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BACKUP 

BASIC 

BASIC 

BASIC 

BASIC 

BASIC 

BASIC 

BASIC 

BDMSALGOL 

BDMSALGOL 

BDMSALGOL 

BDMSALGOL 

BDMSALGOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSCOBOL 

BDMSPLI 

BDMSPLI 

BDMSPLI 

BDMSPLI 

BINDER 

BINDER 

BINDER 

BINDER 

BINDER 

BUILDING 



PATCH 



PR I NOTE DESCRIPTION 



30. 

30. 

30 

30. 

30 

30. 

30. 

30 

30. 

30. 

30. 

30 

30. 

30. 

30. 

30 

30 

30 

30. 

30. 

30. 

30. 

30 

30. 

30 

30. 

30. 

30. 

30 

30 

30 

30 

30. 

30 

30. 

30 

30. 

30 

30 

30 

30 

30 

30 

30 

30. 

30 

30. 

30 

30 

30. 

30. 

30. 

30, 

30. 

30. 

30. 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 



0024 
0025 
0026 
0027 
0029 
0032 
0033 
0034 
0035 
0037 
0038 
0041 
0042 
0043 
0044 
0045 
0046 
0047 
0048 
0049 
0050 
0055 
0071 
0073 
0077 
0080 
0081 
0004 
0005 
0007 
0008 
0002 
0006 
0008 
0010 
0012 
0013 
0014 
0001 
0002 
0003 
0007 
0008 
0009 
0010 
0011 
0012 
0013 
0015 
0016 
0017 
0018 
0019 
0002 
0003 
0004 
0006 
0007 
0011 
0012 
0015 
0051 
0052 
0053 
0072 
0006 
0046 
0054 
0055 
.0056 
0058 
.0064 
,0008 
.0010 
.0011 
0012 
.0007 
0008 
.0009 
.0011 
0025 
.0001 



32757 

32801 

32895 

32799 

32756 

32755 

32755 

32755 

32590 

33018 

33237 

33769 

33232 

33232 

33232 

33232 

33232 

33232 

33232 

33232 

33232 

33232 

32989 

32685 

33934 

33932 

34110 

32755 

32755 

33769 

33232 

32078 

32700 

33184 

33771 

33659 

33654 

33618 

31084 

32333 

32495 

32651 

32657 

32656 

32637 

32635 

32596 

32583 

33806 

33805 

33960 

34052 

34040 

31869 

32745 

32930 

32685 

32928 

32685 

33589 

32300 

33074 

33074 

33070 

33872 

32541 

33302 

33321 

33505 

33074 

33074 

33074 

33069 

33074 

33074 

33070 

32684 

32685 

32686 

32799 

33736 

32279 



D2283 Update Info Level 

D2256 SWARNSUPR Implemented 

D2289 OFFSET Function 

D2424 AUTOBIND end PPB 

P9211 SLOADINFO 

D2403 Warnings on Use of BCL Conslru 

D2403 Warnings on Use of BCL Conslru 

D2403 Warnings on Use of BCL Conslru 

D2425 XREF Procedure End Sequence Nu 

D2442 Pointer in Truthsel for Length 

PI 1 03 Error for Too Many Subscripts 

D2484 DIRECTORYCONTROL, STACKSWAPPER 

D2483 Upl eve I Pointers 

D2483 Up level Po inters 

D2483 Upl eve I Pointers 

D2483 Up leve I Po inters 

D2483 Up I evel Po inters 

D2483 Up I evel Po inters 

D2483 Upl evel Po i nters 

D2483 Upleve I Pol nters 

D2483 Up I eve I Po i nters 

D2483 Up leve I Po inters 

P1481 THRU Loops in I/O Lists 

D2265 Standardization of Compiler Fi 

P1605 Pointer Case Expressions 

P1627 Critical Block Exit from PROCE 

P1638 Scanning After XREFFILES 

D2403 Warnings on Use of BCL Conslru 

D2403 Warnings on Use of BCL Conslru 

D2484 DIRECTORYCONTROL, STACKSWAPPER 

D2483 Up I evel Pointers 

P9285 Task Restructuring 

D2440 NEWFILE Attribute 

P1183 Floppy Disk 

D2478 WFL Jobs See More Task Attribu 

D2496 Swapper Enhancements 

PI 394 FILEKIND=FIRMWARE 

D2508 CANDE Backup File Processing F 

P9030 BACKUP Vs. GETSTATUS 

D2217 "AX-<record #>" GTR Current Re 

P9175 Remove Extra Page Skips 

P9198 New Symbolic for III.O 

P9176 SWAPPER QT • s BACKUP 

P1001 Execute BACKUP with RUN 

P9199 Clean Up Error Handling 

D2275 Disallow "ND" When Used 

D2421 RANGE Option Semantics 

D2443 Disk and Pack Searched for Eac 

P1565 Printer So I ec t ab I e w i In Reel # 

P1557 QT Malfunction 

P1568 Error for Colon 

P1639 Unquoted String 

P1640 PB "<f i lename>" CP <un!tno> 

P9104 Erroneous Lines Written to ERR 

P9201 Equal Precedence for Division 

P9200 Syntax "IF END/MORE" Correctly 

D2265 Standardization of Compiler Fi 

D2280 Scanin Replaced by T1MEINTRINS 

D2265 Standard! zali on of Compiler Fi 

P1657 Syntax Error for Undeclared Im 

P8916 Expand Descriplion Files 

D2488 OPEN TEMPORARY and CLOSE LOCK 

D2488 OPEN TEMPORARY and CLOSE LOCK 

PI 280 Binding DMSII Accesses 

P1486 Allow "-" in Data Base Identif 

P9110 XREF DM Keys in SELECTION Exp 

P1412 Gl obal Data Bases 

P1283 Compares Involving Data Set Na 

P1284 Data Base Section Syntax 

D2488 OPEN TEMPORARY and CLOSE LOCK 

D2488 OPEN TEMPORARY and CLOSE LOCK 

D2488 OPEN TEMPORARY and CLOSE LOCK 

PI 120 Reuse Scratch Stack Areas in K 

D2488 OPEN TEMPORARY and CLOSE LOCK 

D2488 OPEN TEMPORARY and CLOSE LOCK 

PI 280 Binding DMSII Accesses 

P9105 Large Host with Subroutines 

D2265 Slandardl zat ! on of Compiler Fi 

P9106 USE Cards Obeyed 

D2424 AUTOBIND and PPB 

P1466 SSTRICT Gives Syntax Errors 

D2219 Node Syntax 



St at em 
With " 



Without ALGOL 
as Range Va I ue 
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BUILDINQ 


30 


.0 


.0002 


32300 


P8916 


BUILDINQ 


30 


.0 


.0001 


32957 


P1201 


BUILDINQ 


30 


.0 


.0005 


32776 


P1202 


BUILDINQ 


30 


.0 


.0007 


32021 


P1535 


BUILDINQ 


30 


.0 


.0008 


33328 


PI 595 


BUILDINQ 


30 


.0 


.0009 


31282 


PI 685 


BUILDREORG 


30 


.0 


.0001 


32300 


P8916 


BUILDREORG 


30 


.0 


.0001 


33120 


PI 531 


CANDE 


30 


.0 


.0001 


32685 


D2265 


CANDE 


30 


.0 


.0005 


32815 


P9107 


CANDE 


30 


.0 


.0006 


32811 


P9108 


CANDE 


30 


.0 


.0008 


32388 


P1002 


CANDE 


30 


.0 


.0010 


32390 


P9300 


CANDE 


30 


.0 


.0011 


32812 


D2281 


CANDE 


30 


.0 


.0012 


31581 


P1101 


CANDE 


30 


.0 


.0013 


31588 


PI 105 


CANDE 


30 


.0 


.0011 


31587 


PI 106 


CANDE 


30 


.0 


.0015 


31589 


PI 107 


CANDE 


30 


.0 


.0016 


31586 


D2111 


CANDE 


30 


.0 


.0017 


32810 


D2511 


CANDE 


30 


.0 


.0020 


32807 


PI 231 


CANDE 


30 


.0 


.0021 


32811 


P1235 


CANDE 


30 


.0 


.0021 


33618 


D2508 


CANDE 


30 


.0 


.0025 


33617 


D2509 


CANDE 


30 


.0 


.0029 


33617 


D2509 


CANDE 


30 


.0 


.0030 


33618 


D2508 


CANDE 


30 


.0 


.0031 


33618 


D2508 


CANDE 


30 


.0 


.0032 


33613 


P1 197 


CANDE 


30 


.0 


.0033 


33612 


P1 198 


CANDE 


30 


.0 


.0031 


33611 


P1 199 


CANDE 


30 


.0 


.0035 


33610 


P1500 


CANDE 


30 


.0 


.0036 


33608 


P1501 


CANDE 


30 


.0 


.0037 


33609 


P1502 


CANDE 


30 


.0 


,0038 


32685 


D2265 


CANDE 


30 


.0 


.0039 


33607 


P1503 


CANDE 


30 


,0, 


.0010 


33606 


D2552 


CANDE 


30, 


.0, 


.0011 


33897 


PI 656 


CANDE 


30, 


,0, 


,0012 


33618 


D2508 


CANDE 


30, 


.0, 


,0013 


33618 


D2508 


COBOL 


30, 


,0. 


.0005 


32529 


P9067 


COBOL 


30, 


,0, 


,0007 


32512 


P9111 


COBOL 


30, 


,0, 


,0009 


32539 


P1003 


COBOL 


30, 


,0, 


,0010 


32538 


P9112 


COBOL 


30, 


,0, 


,0011 


32537 


D2281 


COBOL 


30, 


,0. 


.0012 


32901 


02259 


COBOL 


30, 


,0. 


,0011 


32685 


D2265 


COBOL 


30, 


,0. 


,0015 


32513 


P9195 


COBOL 


30, 


,0. 


.0016 


32535 


D2522 


COBOL 


30. 


,0. 


,0017 


32531 


P9191 


COBOL 


30, 


0. 


.0018 


32611 


P9299 


COBOL 


30. 


0. 


,0019 


32533 


P1001 


COBOL 


30. 


0. 


0020 


32532 


P1005 


COBOL 


30. 


0. 


0021 


32606 


P1006 


COBOL 


30. 


0. 


0022 


32531 


P1007 


COBOL 


30. 


0. 


0023 


33039 


P1013 


COBOL 


30. 


0. 


0021 


33010 


PI Oil 


COBOL 


30. 


0. 


0026 


33012 


PI 088 


COBOL 


30. 


0. 


0027 


32582 


PI 089 


COBOL 


30. 


0. 


0028 


33019 


P1090 


COBOL 


30. 


0. 


0029 


33017 


P1091 


COBOL 


30. 


0. 


0030 


33013 


PI 092 


COBOL 


30. 


0. 


0031 


33011 


P1093 


COBOL 


30. 


0. 


0032 


33221 


P1158 


COBOL 


30. 


0. 


0033 


33220 


PI 159 


COBOL 


30. 


0. 


0031 


33219 


PI 160 


COBOL 


30. 


0. 


0035 


33271 


PI 115 


COBOL 


30. 


0. 


0036 


33282 


P1116 


COBOL 


30. 


0. 


0037 


33281 


P1117 


COBOL 


30. 


0. 


0038 


33279 


P1118 


COBOL 


30. 


0. 


0039 


33278 


P1119 


COBOL 


30. 


0. 


0010 


33277 


PI 150 


COBOL 


30. 


0. 


0012 


33275 


PI 151 


COBOL 


30. 


0. 


0011 


33299 


PI 152 


COBOL 


30. 


0. 


0015 


33300 


P1111 


COBOL 


30. 


0. 


0017 


33327 


P1113 


COBOL 


30. 


0. 


0018 


33326 


P1210 


COBOL 


30. 


0. 


0019 


33321 


D2521 


COBOL 


30. 


0. 


0052 


33320 


PI 237 


COBOL 


30. 


0. 


0053 


33322 


PI 282 


COBOL 


30. 


0. 


0057 


3319B 


PI 285 


COBOL 


30. 


0. 


0059 


33198 


PI 285 


COBOL 


30. 


0. 


0061 


33502 


D2500 



Expand Description Files 

INVALID INDEX 

Missing Sets 

BUILDINQ Fails With Logical Da 

Looping 

Building Structures Not In Log 

Expand Description Files 

INVALID INDEX With Too Many St 

Standardization of Compiler Fi 

Incorrect GRINDLIMIT Sellings 

PRIVATE Security in MAKE Comma 

Store Length of FIND/REPLACE 

El iminate HOLDQ Problems 

Mandatory Recoveryfile Filekin 

Empty Buffer Size in TERMINAL 

Nongraphic Characters in ?SS a 

Compile Time Task Attribules 

Incorrect Statistics 

MATCH Verb 

Listing Terminalion with BREAK 

Confusion with "7REPEAT" and " 

BEFORE Option in "7ENTER" Verb 

CANDE Backup File Processing F 

Parameters lo START Jobs 

Parameters to START Jobs 

CANDE Backup File Processing F 

CANDE Backup File Processing F 

7QUIT Fai lure 

Incorrect Destinations for ?RE 

Incorrect Error Messages 

State Dump Problems 

REP. RET, TAKE. ENTER wilh CON 

Long File Equations with Compi 

Standardization of Compiler Fi 

Special Characters in UTILITY 

Userlimit for Schedule Session 

Lost Records with MOVE or INSE 

CANDE Backup File Processing F 

CANDE Backup File Processing F 

Constant Section Computational 

STRING gel Erroneous Syntax Er 

Program Por lability 

Group Computational Data Items 

SIGN Clause 

Decimal Accuracy in Compute St 

Standardization of Compiler Fi 

Include Size in Global Array I 

Statistics Dollar Option 

Multiple COPY Statements 

SEG ARRAY Termination of Compi 

Block Name for SSTATISTICS Cod 

Reserved Word in Arithmetic St 

INVALID INDEX on WAIT Statemen 

Optimized PERFORM Statements 

Numeric Test Failed to Check S 

Incorrect Time Generated by AC 

Semicolon in NEXT SENTENCE and 

INVALID INDEX by LOCK Statemen 

RERUN Statement Branched Incor 

Code Listing 

Prevenlion of Integer Overflow 

Xref Giving wrong Sequence Num 

Generalized File Specifier in 

TIME Intrinsic 

Listing of Omitted Source Lang 

Recognition of Numeric Literal 

Invalid Level Numbers 

PERFORM Statements 

COPY Statements 

XREF 

Program Collating Sequence Cla 

Unnecessary Code Generation 

Un digit Literals in VALUE Clau 

MONITOR 

SET Statements 

XREF 

Floating Point Data Declaralio 

Size Error Code Overwritten 

ADO Statements 

Literals in Local Stack 

Literals in Local Stack 

Global Data Bases 
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COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

COPYAUD-II 

CPU 

CPU 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DASDL 

DATACOM 

DATACOM 

DCALGOL 

DCPPROGEN 

DCPPROGEN 

DCPPROGEN 



PATCH 



PRI NOTE DESCRIPTION 



30.0.0063 33499 P1380 Condition Names 
30.0.0066 33676 P1507 Syntax Group Comp Item Used as 
30.0.0067 33677 P1504 STATISTICS Option 
30.0.0068 33915 P1510 Global Direct Files Passed to 
30.0.0069 32685 D2265 Standardization of Compiler Fi 
30.0.0070 33911 P1540 Index Data Names 
30.0.0071 33978 P1538 Set Dynamic File Attributes of 
30.0.0072 33979 P1539 Move Scaied Integer to Alphanu 
30.0.0073 33980 P1567 ANSI74 Default Write After Adv 
30.0.0074 34082 P1607 Report Writer 

30.0.0075 34090 P1604 Linage Lines Clause Left I/O R 
30.0.0076 34089 P1641 Value Clause 

30.0.0077 34158 P1650 OPEN EXTEND Leaving I/O Result 
30.0.0078 34155 P1655 ACCEPT Using Incorrect Qualifi 
30.0.0079 33980 P1567 ANSI74 Default Write After Adv 
30.0.0080 34154 P1649 NEXT SENTENCE in INVALID KEY 
30.0.0081 34153 P1648 Illegal Syntax for READ not Ca 
30.0.0082 34152 P1654 Sequence Dollar Option not Rea 
30.0.0002 33126 P1336 MCS Message Causes SEG ARRAY 
30.0.0003 33659 D2496 Swapper Enhancements 
30.0.0004 33656 PI 396 OL PK 

30.0.0005 33643 P1399 DIR Vs. Input Scanner 
30.0.0007 33620 P1407 PD Equal Vs. Nonresident Files 
30.0.0010 33866 P1457 Filedata Catalog Resident Info 
30.0.0004 32006 P1586 Copy Primary Audit on Tape 
30.0.0001 33665 P1377 Remove BCL Characters 
30.0.0003 33572 P1703 OFFLINE Dollar Option 
30.0.0001 32300 P8916 Expand Description Files 
30.0.0002 32038 P8914 Reorganization of Data Set 
30.0.0003 32199 P8913 Invalid Audit AREASIZE with SE 
30.0.0008 32044 P8950 VariaUe Formal Remaps 
30.0.0009 32279 D2219 Node Syntax 
30.0.0016 32441 P9053 VERIFYSTORE Text for Remaps 
30.0.0018 32427 P9074 Optimize Storage of Initial an 
30.0.0019 32422 P9095 Compile Reconstruct with DBNOD 
30.0.0021 32708 P90B8 Minus Sign Problems 
30.0.0022 32707 P9089 Sets with Name DATA 
30.0.0023 32706 P9090 DIVIDE BY ZERO 
30.0.0024 32709 P9091 Non-Usercode Data Bases 
30.0.0025 32712 D2411 New Dollar Options 
30.0.0026 32718 P9262 Automatic Subsets of Sets 
30.0.0027 32720 D2291 Use of Description File 
30.0.0028 32722 P9252 NOT FOUND Exceptions if Entire 
30.0.0029 32723 P9263 Printing File Titles 
30.0.0030 32728 P9186 Group Keys For Random/Index Ra 
30.0.0032 32732 P9301 Control File Compatibility acr 
30.0.0034 32979 P1059 PARTITIONINFO in Compile Order 
30.0.0035 32970 P1028 DASDL Update Timestamp 
30.0.0036 32975 PI 060 Global Data CHECKSUM 
30.0.0037 32976 D2437 REORGANIZE GLOBAL DATA Extende 
30.0.0038 33094 P1203 Group Keys and REORGANIZE 
30.0.0039 33095 P1204 UPDATE Change of Data Set Subt 
30.0.0040 33098 P1205 Error Recovery Improvement 
30.0.0041 33097 P1206 Compiler Fault 
30.0.0042 33099 P1207 Machine ID in Heading 
30.0.0043 33096 D2460 Maintain UPDATE Level 
30.0.0044 33102 D2461 User Defined Dollar Options 
30.0.0045 33103 P1208 Delete Varying Items 
30.0.0046 31104 D2462 Read Ahead Buffering 
30.0.0047 33428 P1275 Improper Invalid Text 
30.0.0049 33430 D2497 New Method of Data Base Initia 
30.0.0050 33107 D2534 UPDATE and INITIALIZE 
30.0.0052 33109 P1447 Deleting Many Structures 
30.0.0053 33110 P1446 Numeric Item Size of Zero 
30.0.0054 33111 P1472 Label Source Input Correctly 
30.0.0055 33112 P1473 NEWTAPE File in Error 
30.0.0056 33113 P1474 UNIQUE Compiles Correctly 
30.0.0057 33125 P1526 INCLUDE Dollar Option 
30.0.0058 33115 P1527 Default Initial Value 
30.0.0059 33121 P1528 INITIALVALUE in DEFAULT Statem 
30.0.0060 33122 P1529 Property Buffer Declaration 
30.0.0061 33116 P1530 Build CONTROL I TEMNODE Correctl 
30.0.0064 32016 P1584 Spurious Error During DASDL Up 
30.0.0065 32014 P1588 Prevent Loop on Dollar Card 
30.0.0067 32010 P161-7 Free Property Buffer for Acces 
30.0.0068 33780 P1686 Prevent Spurious Message 
30.0.0089 32561 P1492 Prevent DCSTATUS Dump with Ext 
30.0.0090 32560 D2545 DCRECON No Longer Visible 
30.0.0082 34278 P1651 Left Type Transfer Function 
30.0.0002 32394 P8993 DCP Fault Report 
30.0.0004 32395 P8999 INITIALIZE RETRY With LOCAL TA 
30.0.0005 32397 P9050 TERMINATE BLOCK 
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DCPPROGEN 

DCPPROGEN 

DCPPROGEN 

DCPFROGEN 

DCPPROGEN 

DCPPROGEN 

DCPTESTGEN 

DCPTESTGEN 

DCSTATUS 

DCSTATUS 

DFO 

DFOSUTEST 

DIAGNOSTMCS 

DISKEX 

DKADDR 

DMALGOL 

DMALGOL 

DMALGOL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DMCTL 

DSK 

DSK 

DUMPALL 

DUMPALL 

DUMPALL 

DUMPALL 

DUMPALL 

DUMPALL 

DUMPANALY 

ESPOL 

ESPOL 

ESPOL 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPOLINTRN 

ESPSIM 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILECOPY 

FILEDATA 

FILEDATA 

FILEDATA 

FILEDATA 

FILEDATA 

FILEDATA 

FORTRAN 

FORTRAN 



PATCH PRI NOTE DESCRIPTION 

30.0.0006 33003 P9266 Correct Fetch Stored Text 
30.0.0007 33004 P1009 Improved Switched Line Handlin 
30.0.0008 33006 PI 143 LINE INTERROGATE 
30.0.0009 33007 P1187 Full Duplex Station Not Busy 
30.0.0010 32762 P1361 Auxiliary Logic Correction 
30.0.0011 32763 P1360 Correct Address Used as a Byte 
30.0.0001 33005 P1094 SNEWSEQERR Option 
30.0.0002 33225 PI 108 Reguire Good Parity on Disk 
30.0.0001 32760 P1141 DCPANALYSIS Output Reformatted 
30.0.0002 32761 PI 142 TERMINAL MAXINPUT/MAXOUTPUT In 
30.0.0001 33665 P1377 Remove BCL Characters 
30.0.0001 33665 P1377 Remove BCL Characters 
30.0.0002 34080 P1578 Invalid Case Index in STASTATE 
30.0.0001 33665 P1377 Remove BCL Characters 
30.0.0001 33241 PI 1 19 Disk Pack Type 235 
30.0.0001 32279 D2219 Node Syntax 
30.0.0019 32426 D2276 Print Dl Stacksize 
30.0.0078 33933 P1606 Data Pools in I/O Lists 
30.0.0001 32279 D2219 Node Syntax 
30.0.0004 32300 P8916 Expand Description Files 
30.0.0006 32423 P9082 Optional File When Initial T z i n 
30.0.0007 32739 P9092 Optional Pr ogr amdump for Contr 
30.0.0008 32715 P1021 Better Displays for Control Fi 
30.0.0009 32724 P1022 Invalid Control File Creation 
30.0.0011 32732 P9301 Control File Compatibility acr 
30.0.0012 32970 P102B DASDL Update Timestamp 
30.0.0013 32977 D2436 Halt/Load Bit Override 
30.0.0014 33092 D2435 Unaudited Data Base Control Fi 
30.0.0015 33093 D2458 Version Overrides Recorded 
30.0.0016 33096 D2460 Maintain UPDATE Level 
30.0.0017 33105 P1276 Invalid Version Timestamp Mism 
30.0.0018 33430 D2497 New Method of Data Base Initia 
30.0.0019 33337 P1347 Separate Include of CF , CFOLD 
30.0.0020 33336 P1349 Check for Valid Structure Numb 
30.0.0022 33783 P1636 Rebuild from II. 8 Dump Tapes 
30.0.0001 33228 PI 1 17 Title Change 
30.0.0002 33665 P1377 Remove BCL Characters 
30.0.0001 32506 P9031 Suppress Extra Lines in LAN Li 
30.0.0002 32500 P9113 Packname Option for File Routi 
30.0.0003 32496 P9114 Correctly Print Variable Recor 
30.0.0004 32222 P9213 Correct Pack Handling 
30.0.0005 32634 P9214 Propagate Save Factor 
30.0.0006 32633 P9215 Revise Tape Handling in DMPMT 
30.0.0004 33635 P1233 Split DBS into Ac t i ve/Nonac t i v 
30.0.0001 32685 D2265 Standardization of Compiler Fi 
30.0.0002 32685 D2265 Standardization of Compiler Fi 
30.0.0005 33770 P1390 Bindinfo for Double Precision 
30.0.0003 32752 P9115 REPLACE FOR NUMERIC Correction 
30.0.0004 32523 P9116 ATTRIBSEARCHER Checking Mnemon 
30.0.0007 32485 D2402 Lower Bounds for FORTRAN Array 
30.0.0011 33222 P1156 TAN and COTAN Inlrinsics 
30.0.0012 33223 PI 157 DGAMMA Intrinsic 
30.0.0020 33287 P1362 BASIC, Making Arrays Present V 
30.0.0023 33594 P1421 BASIC, SETW Improvements 
30.0.0024 32990 P1420 ALGOL Output Array Element 
30.0.0001 32917 P1165 Handle CANT-READ Correctly 
30.0.0001 34336 P9000 Superfluous Comma in WFL Deck 
30.0.0002 32335 P9001 Added Task Exclude Index File 
30.0.0003 31090 D2225 EXCLUDE Syntax Correction 
30.0.0004 32681 P9191 EXTRACTONEFILE vs. GETSTATUS A 
30.0.0006 32642 D2258 NO FILE on INCLUDE statement 
30.0.0007 32636 D2267 Four vs Three Digit System Ser 
30.0.0008 32619 P9189 Expired Task 
30.0.0009 32617 D2272 Savefactor Zero vs FILECOPY 
30.0.0010 32620 P9192 Summary Output Reformat 
30.0.0011 32610 P9289 Scanner Field Extensions 
30.0.0012 32609 P9290 AUXFILE and AUXBUF Field Exten 
30.0.0013 33173 P1291 Large INCLUDE and EXCLUDE LIST 
30.0.0014 33166 D2485 SYNTAX Modifier 
30.0.0015 33138 P1289 FKINDS Array Eliminated 
30.0.0016 33136 P1290 B6800 Vs. FILECOPY Heading 
30.0.0017 33130 P1337 Card Input vs. UNITS=1 
30.0.0020 33837 P1477 Loop on Input 
30.0.0021 33864 P1508 Multiple Task Execution 
30.0.0002 32636 D2267 Four vs Three Digit System Ser 
30.0.0003 33190 P1185 LFILES CAT 

30.0.0006 33181 PI 186 Input String >255 Characters 
30.0.0008 33172 P1392 Running on §6800 
30.0.0009 33133 P1339 Determine System Type 
30.0.0012 34261 P1659 TD830 Vs. Non-TD830 ODT 
30.0.0004 32486 P9068 OPT=l Readlock Code 
30.0.0005 32685 D2265 Standardization of Compiler Fi 
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SOFTWARE 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

FORTRAN 

HELPINQ 

HELPING! 

HELPINQ 

HELPINQ 

HELPINQ 

HELPINQ 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

IN-OUTPUT 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INTERFACE 

INTERFACE 

IOIOP 

IXREF 

IXREF 

IXREF 

IXREF 



PATCH 



30. 
30. 
30, 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 
30. 



0007 

0008 

0009 

0010 

0011 

0013 

0014 

0017 

0016 

0020 

0021 

0022 

0023 

0026 

0027 

0028 

0029 

0030 

0031 

0001 

0004 

0005 

0006 

0007 

0009 

0011 

0023 

0024 

0030 

0037 

0042 

0047 

0048 

0061 

0062 

0066 

0068 

0073 

0114 

0001 

0002 

0003 

0005 

0007 

0008 

0009 

0010 

0011 

0012 

0016 

0018 

0019 

0020 

0021 

0022 

0027 

0028 

0029 

0030 

0031 

0032 

0033 

0034 

0035 

0037 

0038 

0039 

0040 

0044 

0045 

0046 

0048 

0054 

0055 

0056 

0004 

0009 

0001 

0001 

0002 

0004 

0005 



PR I NOTE DESCRIPTION 

32482 P9292 $ Option LEVEL=N, N>15 
32481 P9293 SINCLUDE of a Null Range 
32480 P9294 Improvements to Trailer Inform 
32479 P9295 INVALID INDEX on Oversized Com 
32478 P9296 Use of EXIT as a Subroutine 
32755 D2403 Warnings on Use of BCL Constru 
32485 D2402 Lower Bounds for FORTRAN Array 
32799 D2424 AUTOBIND and PPB 
32998 D2446 VECTORMODE I SALLOWED Deimplemen 
32996 P1365 INVALID OP in CHANGE , OPEN , 

32994 P1367 Correction to VECTORMODEISALLO 

32995 D2501 Installation Intrinsics in FOR 
32995 D2501 Installation Intrinsics in FOR 
32988 P1494 Formal Array in Implied DO Loo 
32685 D2265 Standardization of Compiler Fi 
33924 P1506 Unexpected End of Initial Valu 
33923 P1541 Formals as " Imp I i ed-DO-Var i ab I 
33922 P1542 Source Programs in BCD Code 
33921 P1543 Syntax For DO Statement 

32269 P9087 Correct Syntax Diagram 

32777 D2410 Report Facility for DMSII INQU 

32778 D2409 Multiple-Statement Defines 
32780 D2408 Printer File Attributes 

32962 D2459 New HELP File 

32777 D2410 Report Facility for DMSI I INQU 
30481 PI 325 FILETYPE=6 RECORDCOUNT 
30478 P9274 CLOSE HERE on Empty Tape File 
30477 P9273 PROGRAMDUMP, New IOCB 

30485 P1335 FILETYPE=4 Random I/O 
31591 D2498 Backup File Features 

30486 P1382 CARRIAGECONTROL-CTLASA or CTL3 
30475 D2287 I/O Subsystem Improvements 
30488 D2516 BCL Backup Files 

30488 D2516 BCL Backup Files 

30491 P1410 Status Change Vs. RSVP Replies 

31591 D2498 Backup File Features 

30491 P1410 Status Change Vs. RSVP Replies 

30491 P1410 Status Change Vs. RSVP Replies 

33962 P1574 LEB Resize Missed by OUTPUTREE 

32279 D2219 Node Syntax 

32270 P9015 SEG ARRAY Error 
32434 P9016 INVALID INDEX 

32300 P8916 Expand Description Files 

32429 P9075 INVALID INDEX at I n i I i a I i zat i o 

31506 P9086 Correct Syntax Error 

32268 P9085 Option QUOTES 

32797 D2251 QUIT 

32796 P1023 Correct Check for Name Conflic 

32792 P9179 Display of Exception Value 

32779 P9259 SAVE/RESTORE Large Texts 

32777 D2410 Report Facility for DMSII INQU 

32778 D2409 Multiple-Statement Defines 

32780 D2408 Printer File Attributes 
32966 P1062 Improved Search Algorithms 

32963 P1061 Large Selection Conditions 
30014 P1525 Qualification Resolution 
32019 P1536 INQUIRY Uses Subsets Improperl 
31996 D2581 Right-Justify Numerics in DISP 
31998 P1619 Correct Report Heading Feature 
31996 D2581 Right-Justify Numerics in DISP 
30013 P1524 SEG ARRAY Fault on Input 
32000 P1618 GENERATE in a Parametric Defin 
33801 P1615 Loss of Last Column 

33796 P1620 Report Page Eject 

33801 P1615 Loss of Last Column 

33788 P1687 Error on User Supplied Subscri 

33775 P1688 Double Space on CRT Terminals 

33774 P1623 Range Test 

33753 P1689 SEG ARRAY on Special Character 

33754 P1690 RESTORE Large Text 
33751 P1691 Nested Defines 

32777 D2410 Report Facility for DMSII INQU 

34289 D2587 Error Messages 

34292 P1692 Correct Abbreviations, Report 

34299 P1693 Software Error 

32300 P8916 Expand Description Files 

32970 P1028 DASDL Update Timestamp 

33229 P1118 Accelerate Data Compare 

30070 D2427 String Implementation 

30070 D2427 String Implementation 

33700 D2526 Change INTERACT I VEXREF File Ti 

33699 D2527 Versions for INTERACTI VEXREF F 
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PATCH TABLE 
SOFTWARE 

IXREF 

IXREF 

IXREF 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

LCOBOL 

LCOBOL 

LCOBOL 

LCOBOL 

LOADDUMP 

LOADDUMP 

LOADDUMP 

LOADDUMP 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGGER 

LOGMAPPER 

LOGMAPPER 

LOGSTRIPPER 

LTTABLEGEN 

LTTABLEGEN 

MAINTMCS 

MAINTMCS 

MAINTMCS 

MAINTMCS 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 



PATCH PR I NOTE DESCRIPTION 

30.0.0006 33742 D2525 Add PRINTER Option for HELP Co 
30.0.0007 33741 P1430 Modify Output Format 
30.0.0008 33740 P1431 Correctly Expand Defines 
30.0.0001 33147 P1294 Cosmetic Changes 
30.0.0002 33131 D2486 PE9MT Vs. PETAPE 
30.0.0003 33549 P1293 Swapjob Number and Job Name 
30.0.0.005 33638 P1383 Job Scheduletime 
30.0.0007 33867 P1422 Checkbit Result Mapping 
30.0.0008 33853 P1475 Job Log I/O Errors 
30.0.0006 33231 D2417 FILEKIND for LCOBOL Symbol, Co 
30.0.0008 33514 P1368 Correct Bad Literals, OPTIM 
30.0.0010 33919 P1608 Number of Characters in a Grou 
30.0.0011 33918 P1593 Patching LCOBOL Source Program 
30.0.0001 32300 P8916 Expand Description Files 
30.0.0005 32012 P1596 Filler Dropped from COBOL File 
30.0.0006 32009 P1694 Syntax Error When Mapping Bit 
30.0.0007 33787 P1695 Invalid Syntax Error 
30.0.0002 33626 P1343 Change Panel, SPO Display 
30.0.0003 32866 D2273 IV vs 235 
30.0.0005 33644 P1455 Disk Pack I/O Errors 
30.0.0006 33855 P1460 Correct EOJ Message 
30.0.0008 33813 P1551 LOADER Vs. Multiprocessor 
30.0.0001 31089 P9026 Syntax Correction for SESSION 
30.0.0002 31088 P9032 UA/UR Message Displays 
30.0.0003 32505 P9052 Spurious Records if File Equat 
30.0.0004 33819 D2554 B6800 CPUERROR 
30.0.0006 32636 D2267 Four vs Three Digit System Ser 
30.0.0007 32624 P9203 Log Date Correction 
30.0.0008 33193 P] 133 SO and RO Options Display 
30.0.0009 33164 P1295 STOPDATE Default 
30.0.0010 33163 P1296 MAINT Log Entries 
30.0.0011 33147 P1294 Cosmetic Changes 
30.0.0012 33146 P1297 IOERRIRRCOUF Field 
30.0.0013 33145 P1298 INVALID INDEX in SORTIN Proced 
30.0.0014 33819 D2554 B6800 CPUERROR 
30.0.0017 33819 D2554 B6800 CPUERROR 
30.0.0020 33827 P1573 132 Character Output 
30.0.0021 33819 D2554 B6800 CPUERROR 
30.0.0022 33968 D2561 PROCESSOR ID 

30.0.0023 33952 PI 580 LOG COMMENT Equals LOG OPERATO 
30.0.0024 34273 P1637 LOG MAINT Correction 
30.0.0001 31351 P8618 UPDATE Option New File Creatio 
30.0.0002 32673 P9118 INCLUDE, EXCLUDE .CORRECTION Arr 
30.0.0003 32674 P9119 EOF NO LABEL if Input Exceeds 
30.0.0005 32636 D2267 Four vs Three Digit System Ser 
30.0.0006 32629 P9206 BREAK ON PRIORITY 
30.0.0007 32626 P9205 Include UNITNO Correction 
30.0.0008 32625 P9204 Retention Report Item Correct! 
30.0.0009 33161 P1299 INCLUDE, EXCLUDE Correction 
30.0.0010 33144 P1300 Three vs. Four Digit System ID 
30.0.0014 33861 D2536 JOBSUMMARY File Record Size In 
30.0.0015 33841 D2537 PRE27 Option Removed 
30.0.0016 33850 D2538 JOBENTRYTIME , JOBQUEUEDTIME 
30.0.0017 34047 P1642 Version Heading Changed 
30.0.0018 34046 P1643 Log Title Display Truncated 
30.0.0019 34038 P1644 REAL, INTEGER ITEMS Used as BR 
30.0.0020 34037 P1645 PRIORITY Item Type INTEGER 
30.0.0021 34035 P1646 INCLUDE, EXCLUDE Vs. Strings 
30.0.0001 33242 PI 1 15 SPO Input Error Messages 
30.0.0002 33480 PI 228 TODAY FOR LAST NN WEEKS 
30.0.0001 33230 P1114 File Added, Duplicate Identifi 
30.0.0001 33201 PI 130 450/750 LPM Train Printers 
30.0.0002 33200 P1124 User Specified Tables 
30.0.0001 33561 P1271 Improper Test Number Selection 
30.0.0002 33562 D2479 Datacom-to-Di sk Syntax 
30.0.0004 33564 D2480 CANCEL Command for DCPTEST 
30.0.0005 34079 D2582 Front-End-Control Selection 
30.0.0002 33272 P1313 LINKLLISTIT 
30.0.0003 33270 P1314 CP Vs. HPT/PACK 
30.0.0004 32690 P9286 DM6700 Vestiges Removed 
30.0.0005 33154 P1316 CP File Security 
30.0.0006 33157 P1317 Locks Vs. PAST 

30.0.0007 33129 P1323 File Size Vs. Close with Crunc 
30.0.0010 33546 P1324 Make WFL Use Direct Array 
30.0.0012 32690 P9286 DM6700 Vestiges Removed 
30.0.0013 33544 P1326 INFODUMPER Option 
30.0.0014 33214 P1126 Sticky Memory 
30.0.0015 32690 P9286 DM6700 Vestiges Removed 
30.0.0016 33540 P1327 Error Messages for Unreleased 
30.0.0017 33542 P1328 Foreign Printer Train Problem 
30.0.0020 33540 P1327 Error Messages for Unreleased 
30.0.0021 33539 D2518 Segmented String Variables 
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PATCH TABLE 
SOFTWARE 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MCP 

MEMORY 

MEMREQ 

MILO 

MILO 

MILO 

MILO 

MILO 

MILO 

MILO 

MIL6700 

MIL6700 

MIL6700 

MIL6700 

MIL6700 

M1L6700 

MIL6700 

MIL6700 



PATCH 



PRI NOTE DESCRIPTION 



30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30. 

30 

30. 

30. 

30 

30. 

30 

30 

30 

30 

30 

30 

30 

30 

30. 

30 

30 

30 

30 

30 

30. 

30. 

30. 

30. 

30 

30. 

30 

30 

30 

30. 

30 

30 

30. 

30 

30 

30. 

30. 

30. 

30. 

30. 

30. 

30. 

30 

30 

30 

30. 

30. 



0022 
.0025 
.0026 
.0028 
.0029 
,0031 
,0035 
.0038 
,0039 

. ooto 

,0041 
.0043 
.0044 
0045 
0046 
0049 
0050 
0051 
0055 
0056 
0057 
0058 
0060 
0063 
0070 
0072 
0074 
0075 
0076 
0077 
0080 
0082 
0084 
0085 
0086 
0087 
0088 
0092 
0093 
0097 
0098 
0099 
0101 
0102 
0103 
0104 
0105 
0106 
0108 
0109 
0110 
0112 
0113 
0115 
0121 
0128 
0129 
0132 
0133 
0143 
0148 
0163 
0165 
0166 
0176 
0001 
0001 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
0001 
0002 
0003 
0004 
0005 
0006 
0007 
0009 



33524 

33537 

33534 

33536 

33667 

33659 

33659 

33657 

33656 

33536 

33654 

33659 

33638 

33524 

33637 

33765 

33636 

33632 

33659 

33623 

33652 

33651 

33659 

33536 

33647 

33540 

33866 

33646 

33645 

33862 

33856 

33846 

33843 

33845 

33839 

33840 

33847 

33848 

33834 

33635 

33845 

33823 

33825 

33815 

33824 

33810 

33809 

33808 

33804 

33969 

33714 

33635 

33048 

33635 

34085 

34096 

33085 

33635 

34066 

33539 

33765 

34101 

34261 

33014 

33272 

33665 

33665 

32947 

32948 

32950 

32953 

32906 

33413 

33420 

32768 

32769 

32911 

32912 

32768 

32956 

33364 

33411 



PI 329 
P1330 
P1331 
P1333 
PI 334 
D2496 
D2496 
PI 395 
PI 396 
PI 333 
PI 394 
D2496 
PI 383 
PI 329 
PI 384 
D2514 
PI 397 
PI 385 
D2496 
P1391 
P1401 
PI 408 
D2496 
PI 333 
P1415 
PI 327 
PI 457 
PI 432 
PI 433 
PI 454 
PI 478 
PI 479 
P1480 
D2539 
PI 482 
P1483 
PI 487 
PI 493 
P1512 
PI 233 
D2539 
PI 555 
PI 554 
PI 553 
PI 559 
PI 560 
P1561 
D2550 
PI 562 
PI 563 
PI 537 
PI 233 
PI 493 
PI 233 
D2577 
PI 224 
D2579 
P1233 
PI 667 
D2518 
D2514 
PI 668 
PI 659 
D2586 
P1313 
PI 377 
PI 377 
PI 161 
P1162 
PI 163 
PI 166 
P1167 
PI 249 
PI 239 
PI 189 
PI 190 
PI 188 
D2412 
PI 189 
P1164 
D2457 
PI 272 



Special Peripheral Control 

GETSTATUS Vs. Directory 

READER BADMOM 

PATHRES PBIT 

CM Suppresses SEEK 

Swapper Enhancements 

Swapper Enhancements 

DISCSTATUS Changes 

OL PK 

PATHRES PBIT 

FILEK1ND=FIRMWARE 

Swapper Enhancements 

Job Scheduletime 

Special Peripheral Control 

Multiprocessor Dumps 

Parameters to Jobs Allowed 

PB MT<number> Vs. ACMAX 

Allow Recovery Files After DS 

Swapper Enhancements 

Direct Read from Schedule File 

UA Path to Tape 

FAULTHANDLER Vs. Tagged Words 

Swapper Enhancements 

PATHRES PBIT 

Tape 403 Result Descriptor 

Error Messages for Unreleased 

Filedata Catalog Resident Info 

CP Vs. AIT 

CP Secur i I y 

READALABEL Update of Tape Kind 

Ending Banner Vs. Page Size 

Protected Files Vs. Update Fil 

Reply Left Armed (NODISK) 

OPTIMIZER Option Removed 

SWAPPER Vs. EI 

Blocksearch, Epilog Vs. COTOSO 

FLATREADER Bad Record Message 

LIBMAINT Vs. TAPEPARITYRETRY 

DMSOPEN Header 

Split DBS into Active/Nonactiv 

OPTIMIZER Option Removed 

Make SWAPPER Save When Running 

RCNTL 

Controller Malfunction 

Volume Delete 

AX 

FORMATBUFFER 

Return Queue of Origin 

Mode I 4 Mu I t i p I exor 

IAD Vs. HLUNIT 

Dangling Reply Event in GETUSE 

Split DBS into Active/Nonactiv 

LIBMAINT Vs. TAPEPARITYRETRY 

Split DBS into Active/Nonactiv 

Close REEL Statements 

Avoid GO TO Exited Bl ock 

"Pre-2.4 ON <fault> Statements 

Split DBS into Active/Nonactiv 

Update I/O Vs. IOERROR 

Segmented String Variables 

Parameters to Jobs Allowed 

Memory Dump 

TD830 Vs. Non-TD830 ODT 

Test for WFL Data Decks Being 

LINKLLISTIT 

Remove BCL Characters 

Remove BCL Characters 

Delete IO Complete Timers 

Implement General IO Timers 



Reduce Flow-Stopped Timers 
Improve Disk R.D. Logging 
ITEM-TYPE in FLOW-STOPPED Sect 



Handshake Failure 

Console Sw itches 

Implement Dollar Option VERSIO 

Delete Programdump Statement 

INCLUDE Do I lar Option 

Improve Dollar Option Handling 

Implement Dollar Option VERSIO 

Remote Cycle and Version 

Conditional OMIT 

Logical Express i ons 
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PATCH TABLE 
SOFTWARE 

MPX 

NDL 

NDL 

NDL 

NDL 

PATCH 

PATCH 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PEP 

PKACTUATOR 

PKBASIC 

PKDUMP 

PKHDOVER 

PKHEADISOL 

PKINTERCH 

PKSCAN 

PKSCAN 

PKSEEK 

PKTEST 

PKWRITEREAD 

PKXD 

PK04 

PK05 

PK06 

PK07 

PKD8 

PKD9 

PK10 

PK11 

PK15 

PK16 

PL I 

PL I 

PL I 

PL I 

PL I 

PL I 

PL I 

PL I 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PLINTRN 

PRINTAUDIT 

PRINTAUDIT 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PTNCTL 

PTNCTL 

PTNCTL 

REAOERSORTER 

READERSORTER 

RECOVERY 

RECOVERY 



PATCH 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0, 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0. 

30.0, 

30.0, 

30.0. 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0, 

30.0 

30.0 

30.0 

30.0 

30.0 

30 



30.0 

30.0 

30.0 

30.0 

30.0 

30.0 

30.0 

30.0 

30.0 

30 

30 

30 

30 

30 

30 

30 

30 

30.0 

30.0 

30.0 

30 

30 

30 

30 

30 



30.0 



0001 
0002 
0003 
0004 
0005 
0001 
0003 
0001 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
0009 
0010 
0011 
0012 
0013 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0002 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0003 
0004 
0005 
0007 
0009 
0015 
0016 
0017 
0003 
0004 
0005 
0006 
0007 
0009 
0010 
0012 
0013 
0003 
0005 
0002 
0005 
0006 
0009 
0010 
0011 
0013 
0014 
0015 
0016 
,0017 
,0018 
,0019 
,0020 
.0001 
,0002 
.0005 
,0001 
,0004 
,0004 
,0005 



PR1 

33665 

31937 

3275B 

32759 

32762 

32816 

31585 

33283 

33554 

33555 

33556 

33557 

33665 

33711 

33712 

33713 

34306 

34307 

34308 

34309 

33707 

33707 

33707 

33707 

33707 

33707 

33490 

33553 

33707 

33710 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

33707 

30068 

32685 

30072 

33077 

33073 

33870 

33871 

32685 

32521 

32519 

32518 

32520 

32516 

32517 

32871 

33077 

33068 

32789 

33345 

32300 

32289 

32279 

32720 

32280 

32789 

32781 

32970 

33093 

33250 

31104 

33430 

33343 

33344 

32279 

32721 

33340 

32802 

32909 

32289 

32279 



NOTE DESCRIPTION 



PI 377 

P9121 

P9122 

PI 056 

P1361 

P9123 

PI 198 

PI 138 

PI 260 

P1261 

PI 262 

PI 263 

PI 377 

P1670 

P1671 

PI 672 

PI 673 

P1674 

PI 675 

P1676 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

P1442 

PI 264 

PI 265 

PI 442 

PI 669 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

PI 442 

D2261 

D2265 

P1041 

D2422 

P1302 

PI 467 

PI 468 

D2265 

P9125 

P9126 

P9127 

P9128 

P9129 

D2254 

P9130 

D2422 

PI 099 

P9185 

P1351 

P8916 

P8943 

D2219 

D2291 

P9264 

P9185 

D2288 

PI 028 

D2458 

PU82 

D2462 

D2497 

PI 345 

PI 352 

D2219 

PI 024 

PI 350 

D2414 

P1035 

P8943 

D2219 



Remove BCL Characters 
One -Character Request Identifi 
EOF with Missing Define Crossh 
Increment Sequence Corrected 
Auxiliary Logic Correction 
Incorrect Handling of "S.DISK" 
Incorrect Sequence Error Issue 
Load Tra i n Tables 
Code Space in SEG1 
READ EXTENDED RD OPTION 
Run wi th PASS Set 
Peripheral Unit Search 
Remove BCL Characters 
64 Memory Modules 
Change Printer and Display Mes 
Specified and Nonspecified Tra 
Multiple Processors Initialize 
Indicate PK2 Test Case Modifie 
No PB MAE Test if MM63 is Pres 
Make RUNHCT Run 



Net 

New 

New 

New 

New 

New 



Contro 
Contr o 
Contro 
Contro 
Contro 
Contro 



Fau It Pr i nlout 



Add 
New 
Run 
New 

New 
New 
New 
New 
New 
New 
New 
New 
New 
New 
New 



Contro 
Contro 



on 



BX385-235 



ware 
ware 
ware 
ware 
ware 
ware 



in Control 
Disk Pack 



ware 
ware 



, Disk 

, Disk 

, Disk 

, Disk 

, Disk 

Level 
Disk 



Pack 
Pack 
Pack 
Pack 
Pack 



Sta 
Typ 
Typ 
Typ 
Typ 
Typ 
Typ 



Pack Typ 
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LEX LEVEL > 15 

Standardization 

Failure to Flag 

STATISTICS 

RESTARTED Task Attribute 

"SET STATISTICS" 

Preprocessor INITIAL At tr i but e 

Standardization of Compiler Fi 

ISAM """ """ " 

ISAM 

ISAM 

ISAM 

ISAM 



of Compiler F i 
Large Precisio 



ISCLOSE Checks Value of 
Delete First Record in 
Numer i c Keys 
Adding Records to Unblo 
Return Proper Value fro 
Summary of Conditions and DS ' e 
ISAM , Erroneous ISCLOSE Resul 
STATISTICS 

Character to Bit Conversion 
Elimination of Holes in Restar 
Time Off by One Second 
Expand Description Files 
Correct Discontinuity Checking 
Node Syntax 

Use of Description File 
Eliminate MASKSEARCH in FIND K 
Elimination of Holes in Restar 
Path Fixing Consistent 
DASDL Update Timestamp 
Version Overrides Recorded 
DBS D3 NOMEM 
Read Ahead Buffering 
New Method of Data Base Initia 
Retry Disk Read on Checksum Er 
Essential, Inessential Audit R 
Node Syntax 

Change Include Range on DATABA 
Wrong Family for Global Data 
Add RSC-3 Test Name 
Modify RSP DIED Result Descrip 
Correct Discontinuity Checking 
Node Syntax 
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RECOVERY 

RECOVERY 
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PATCH PR I NOTE DESCRIPTION 

30.0.0007 32290 P8975 Handle Audit Block Size Change 
30.0.0008 32279 P8976 Die on DBST if REBUILD 
30.0.0010 32276 P8977 Positioning the Audit for Reco 
30.0.0011 32435 P9017 NO FILE PARAMETERS 
30.0.0013 32791 P9181 Correct Ordered Set Paths 
30.0.0014 32789 P9185 Elimination of Holes in Restar 
30.0.0016 32985 P9254 Correct Possible INVALID INDEX 
30.0.0017 32781 D2288 Path Fixing Consistent 
30.0.0018 32720 D2291 Use of Description File 
30.0.0019 33093 D2458 Version Overrides Recorded 
30.0.0020 32961 P1209 Termination Conditions, ROLLBA 
30.0.0021 32789 P9185 Elimination of Holes in Restar 
30.0.0022 33344 P1352 Essential, Inessential Audit R 
30.0.0023 33341 P1353 Miscellaneous Rebuild Error 
30.0.0024 33335 P1354 Rebuild After Deleting Structu 
30.0.0025 33330 P1393 Ordered Data Set Halt/Load Rec 
30.0.0026 30006 P1445 Stretch Header for Current Row 
30.0.0028 30011 P1521 Recovery of Partitioned Struct 
30.0.0029 32020 P1532 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0030 32017 P1583 ROLLBACK Using Tape Audit 
30.0.0031 32001 P1614 Restart Reconstruction at Rest 
30.0.0032 33792 P1621 Rebuild Fails With On-Line Dum 
30.0.0033 33762 P1633 RECOVERY Takes Programdump on 
30.0.0034 33763 P1632 Erroneous Row Lockout 
30.0.0035 33764 P1631 ROLLBACK Gets Timestamp Mismat 
30.0.0036 33755 P1634 Data Recovery Setting Bad EOF 
30.0.0037 34284 P1696 UNIDENTIFIED MISCELLANEOUS ERR 
30.0.0038 34297 P1684 Hall Load Recovery Uses Wrong 
30.0.0039 34298 P1701 Audit Beyond BLKIMG Record Fai 
30.0.0040 34294 P1702 "LIMIT = THRU AUDIT" Failure 
30.0.0001 32198 P8912 Sort Error #4 on Internal Sort 
30.0.0002 32204 P8918 Resequence Document Section 
30.0.0004 32203 P8917 Di scont i nui ly Record on Fixed 
30.0.0005 32279 D2219 Node Syntax 

30.0.0007 32738 P9093 Invalid Reorganization of Empt 
30.0.0008 32714 P9083 Remove Use of Certain Compile 
30.0.0010 32202 P1025 Program Efficiency 
30.0.0011 32727 P9183 Invalid Reorganization of Rand 
30.0.0013 32731 P9255 NORECORD Error Empty Unordered 
30.0.0014 32971 P1055 Correct Allocation of Restart 
30.0.0015 32978 P1063 INVALID INDEX Reorganizing Bit 
30.0.0018 33784 P1697 Process Time Acceleration 
30.0.0019 33778 P1698 Invalid Checksum 
30.0.0001 33494 P1266 Add TD830 Display and DPK235 
30.0.0003 32328 P9033 Usercode Attached to Card Inpu 
30.0.0004 32632 D2406 Enhanced Backup File Handling 
30.0.0005 32649 D2262 STATIONID Caused Reconf i gur a t i 
30.0.0006 32680 D2260 WAIT No Longer a Debug Option 
30.0.0007 32621 P9216 Summary File Purge by *PB 
30. C 0008 32682 D2274 SAVE/READY Station Removal 
30.0.0009 32613 PI 01 1 Usercode Attributes for RJE St 
30.0.0011 32611 D2401 REMOTEPUNCH $ Option Removal 
30.0.0012 32608 P 1010 Blank Cards Inserted into Inpu 
30.0.0013 32605 P1013 B6700 Vs. B7700 Backup Handlin 
30.0.0014 32601 P1012 INVALID INDEX for >15 BD Files 
30.0.0015 32587 P1045 Family Attribute Incorrect Syn 
30.0.0016 32585 D2426 Device Not Ready Abort QT of P 
30.0.0017 32584 P1075 Extra Page of Paper 
30.0.0018 32683 D2431 Implement SF and TF on a Stati 
30.0.0019 33204 PI 121 REBU1LDPRINTQUEUE BD File Corr 
30.0.0020 33202 P1122 INVALID INDEX with One Word Me 
30.0.0021 33177 P1257 Printing Jobs with More Than 1 
30.0.0022 33194 D2490 "*PER" Implementation 
30.0.0023 33165 P1304 USER Option for WFL Secured Re 
30.0.0024 33162 D2491 LOGON Without PASSWORD on B700 
30.0.0026 33175 D2492 Backup File Routing 
30.0.0027 33143 P1306 RJEL1NKED Recovery Problem 
30.0.0028 33141 D2489 LOGON Syntax Changes and Exten 
30.0.0029 33139 P1303 REMOTECONTROL Vs. PRIMARYQUEUE 
30.0.0030 33132 D2504 RSC TERM Defaults and Use Imp 
30.0.0031 33621 P1424 SYSTEM/BACKUP Vs. Disk or Pack 
30.0.0032 33718 D2529 Rj e I inked File Title Change 
30.0.0034 33869 P1425 Foreign Station Transfer 
30.0.0035 33817 P1531 Losing Blank Card at End of Bl 
30.0.0036 33967 D2560 " 'STATUS" Report NO TASKS ACTI 
30.0.0037 33966 P1558 WFL COMPILER with No PRIORITY 
30.0.0038 33965 P1566 DESTNAME NEQ RJE Terminal Pr 
30.0.0039 32613 P1011 Usercode Attributes for RJE St 
30.0.0040 33966 P1558 WFL COMPILER with No PRIORITY 
30.0.0042 34051 PI 624 BREAK on RJE RSC 
30.0.0043 34050 P1625 FORMEDLP Array Vs. REMOTEPUNCH 
30.0.0044 34048 P1626 Missing SKIP to Channel 1 
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32956 

32906 

33364 

33424 
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33419 

33418 

32766 

33553 

33670 

33671 

30070 
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32545 

33399 

33511 

33511 

33579 

33511 

34173 

33408 

33665 

33227 

33665 

33709 

33709 

33709 
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33709 

32547 

33424 
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32279 

322B6 

32443 
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33093 

33100 

32973 
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P1170 

PI 169 

PI 168 

P1308 

P1309 

P1310 

P1311 
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P1426 

P1495 

D2539 

PI 267 

PI 265 

PI 427 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 227 

PI 398 

D2413 

D2412 

PI 164 

PI 167 

D2457 

D2473 

D2481 

D2474 

PI 250 

D2475 

P9303 

PI 265 

PI 436 

PI 437 

D2427 

D2427 

D2400 

PI 270 

PI 448 

P144B 

P1440 

P1448 

P1677 

P1704 

PI 377 

PI 1 16 

PI 377 

PI 496 

PI 496 

PI 496 

PI 496 

PI 496 

D2413 

D2473 

P8944 

D2219 

P8985 

P9019 

P9076 

D2244 

D2243 

P9182 

P9184 

P9258 

P9279 

P9278 

P1072 

D2436 

D2458 

P1210 
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Improve Disk R.D. Loggini 

Handle Multi-Record Log 

Correct Dale Printout 

Declaration of Zero Reader/Sor 

TESTOP Resu I t for Disp I ay 

TESTOP Subtype 

Return MPX I I I in UNITTYPE 

Allow CONTBUF Read on BX385 

SCR MARKNO III 

Delete EXPERIMENTAL Option 

Allow Train Table Load 

OPTIMIZER Option Removed 

Add DPK235 

Add Con t ro I war e Level 

Redundant Character Correction 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

TD830 and B7700 Update 

MERGE Vs. UNITS-1 

Allow PIC X in Reader/Sorter R 

Improve Dollar Option Handling 

Remote Cycle and Version 

ITEM-TYPE in FLOW-STOPPED Sect 

Conditional OMIT 

Implement MOVE LENGTH 

Black Band Warn i ng 

Dollar Warning Default 

Picture Following SIZE 

Volume/Subset Criteria 

Modifications to TD800 Request 

Add Controlware Level 

Error Retry for New Controlwar 

Balance of Track Read Length 

String Implementation 

String Implementation 

TABLEGEN No Longer Handles ALG 

List Card Assembly Part Number 

New Data File Title = Old File 

New Data File Title = Old File 

Deleted FAMILY Statements 

New Data File Title = Old File 

Maintenance Kit Release Versio 

Update Comments in Symbolic 

Remove BCL Characters 

Title Change 

Remove BCL Characters 

SCR Tests for Train Printers 

SCR Tests for Train Printers 

SCR Tests for Train 

Train 

Train . 
Reader/Sor t er 
MOVE LENGTH 
Def au I t 
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SCR 



for 
for 
for 
X in 



Pr i n t er s 
Pr i n t er s 
Printers 



Tests 

Tests 
Al I ow PIC 
Implement _ __ 
New Tape Block Default Si 
Node Syntax 

Reconstruct Onto DB Files 
Reconstruct Empty File 
No Reconstruction on Row Not D 
Limit Error 
Specify PACKNAME 
No File for Dumps to Disk 
New III.O Format Tape Blocks 
READERROR Set for Selected Row 
Problems in RECONINFO 
Problems with Partitions 
File Listed Inside Parentheses 
Ha I t/Load Bi t Overr ide 
Version Overrides Recorded 
Correct Blocksize for CFOLD 
Correct Allocation of Tapes 
Label BADTAPE 

Recovery using II. 8 Dump Tapes 
No File on CONTROLOLD 
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UTIL 30.0.0027 33430 D2497 New Method of Data Base Initia 

UTIL 30.0.0028 33347 P1355 Remove First Read Error Messag 

UTIL 30.0.0029 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0030 33108 P1356 Fault Initializing Large Name 

UTIL 30.0.0031 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0032 33336 P1349 Check for Valid Structure Numb 

UTIL 30.0.0033 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0034- 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0035 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0036 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0037 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0038 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0039 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0041 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0042 33338 D2441 Multiple Worker Recovery 

UTIL . 30.0.0043 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0044 30009 P1581 Halt/Load Restart with Mu I t i p I 

UTIL 30.0.0045 32004 P1597 Tape Kind Set Correctly for Fi 

UTIL 30.0.0046 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0047 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0048 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0049 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0050 33790 P1622 Row Selection with Multiple Op 

UTIL 30.0.0051 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0052 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0053 33757 P1630 Fault in REALSWITCH 

UTIL 30.0.0054 33799 P1629 System Partitioned Files can b 

UTIL 30.0.0055 33789 P1635 PRINTIT Gives Error for Block 

UTIL 30.0.0057 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0058 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0059 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0060 34291 P1699 Initializing Standard Data Set 

UTIL 30.0.0062 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0063 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0064 33338 D2441 Multiple Worker Recovery 

UTIL 30.0.0065 33336 D2441 Multiple Worker Recovery 

WFL 30.0.0006 32873 P9131 WFL Termination if DS While Sc 

WFL 30.0.0008 32879 P9132 Error for Missing UNTIL 

WFL 30.0.0009 32877 P9133 Eliminate INVALID INDEX on WFL 

WFL 30.0.0010 32876 P9134 Proper Information for Long CO 

WFL 30.0.0011 32875 P9135 Perform Job Rollout in More In 

WFL 30.0.0012 32880 P9159 Information Carry Over 

WFL 30.0.0013 32888 D2266 Limit on Nested Subroutine Dec 

WFL 30.0.0014 32890 P9247 DECK STATEMENT 

WFL 30.0.0017 32887 D2423 AREASIZE and BLOCKSIZE Attribu 

WFL 30.0.0018 32613 PlOtl Usercode Attributes for RJE St 

WFL 30.0.0019 32891 P1046 Explicit Loops around COMPILE 

WFL 30.0.0020 32894 P1047 Generate Error for Bad KIND Sp 

WFL 30.0.0021 32892 P1048 WFL Aborts for Extremely Large 

WFL 30.0.0022 32893 P1049 String Expressions in ON State 

WFL 30.0.0023 33036 P1050 Handling of KIND Lists in OLD 

WFL 30.0.0024 33038 P1051 DATA or END Within File Names 

WFL 30.0.0025 33024 P1052 Handling of Missing ?END JOB C 

WFL 30.0.0026 33025 P1064 Improve Handling End of File 

WFL 30.0.0027 33037 P1068 Infinite Loop Following Securi 

WFL 30.0.0028 32889 D2434 Clearing Card Reader in Use by 

WFL 30.0.0030 33030 P1067 Eliminate WFL Abort on Bad Fil 

WFL 30.0.0031 33029 D2433 L1NEINFO for Job Code Files 

WFL 30.0.0032 33026 P1066 Long COPY Statements 

WFL 30.0.0033 33027 P1065 Single START Statement 

WFL 30.0.0035 33032 D2449 Expressions in COMPILE Stateme 

WFL 30.0.0037 33765 D2514 Parameters to Jobs Allowed 

WFL 30.0.0038 33765 D2514 Parameters to Jobs Allowed 

WFL 30.0.0039 33766 P1376 Errors in Declarations 

WFL 30.0.0042 32887 D2423 AREASIZE and BLOCKSIZE Attribu 

WFL 30.0.0043 32892 P1048 WFL Aborts for Extremely Large 

WFL 30.0.0045 33693 P1485 Boolean Constant Evaluation 

WFL 30.0.0046 33692 P1489 Correct HEX Function 

WFL 30.0.0047 33767 P1488 Single Blank Character String 

WFL 30.0.0048 33765 D2514 Parameters to Jobs Allowed 

WFL 30.0.0049 32887 D2423 AREASIZE and BLOCKSIZE Attribu 

WFL 30.0.0052 33765 D2514 Parameters to Jobs Allowed 

WFL 30.0.0053 33896 P1658 Backward Branches in ON Stalem 

WFL 30.0.0054 33015 P1660 SINCLUDE with NEWSOURCE or LIB 
XREFANALY 30.0.0001 30070 D2427 String Implementation 
XREFANALY 30.0.0002 30070 D2427 String Implementation 
XREFANALY 30.0.0003 32590 D2425 XREF Procedure End Sequence Nu 
XREFANALY 30.0.0005 33701 P1429 Correction Declaration Count 
XREFANALY 30.0.0006 33700 D2526 Change INTERACTI VEXREF File Ti 



